Desktop Management スクリプト言語 › 関数 › ファイル システム関数 › GetLongFileName - 短縮ファイル名をロング ファイル名に変換する

GetLongFileName - 短縮ファイル名をロング ファイル名に変換する

Windows 上で有効

GetLongFileName 関数では、短縮ファイル名がロング ファイル名に変換されます。

ファイルの内容に関するこの関数の形式は、以下のとおりです。

GetLongFileName(shortFileName as string, longFileName as string) as Boolean

shortFileName

これは入力パラメータです。 ロング ファイル名形式に拡張される MS DOS 8.3 ファイル名です。

longFileName

これは出力パラメータです。拡張されたロング ファイル名を受け取ります。

この関数では、正常に終了した場合、TRUE が返され、それ以外の場合、FALSE が返されます。 ファイル名を変換するには、関連するファイルがシステムに存在している必要があります。それ以外の場合は、この関数が失敗します。

例： GetFileStoreFree、GetFileStoreSize、および GetFileStoreUsage 関数

この例では、ロング ファイル名が短縮名に変換された後、ロング ファイル名に戻されます。

Dim lName, oName, sName As String
ClrScr()

oName ="c:¥temp¥a bb ccc dddd¥abcdefghijklmnopqrstuvwxyz.txt"
If Not(GetShortFileName(oName, sName)) Then
	MessageBox("Can not convert to short", "DMS", MB_OK + MB_ICONEXCLAMATION)
	SetStatus(1)
	終了
End If
Print( oName + " - " + sName)
If Not(GetLongFileName(sName, lName)) Then
	MessageBox("Can not convert to long", "DMS", MB_OK + MB_ICONEXCLAMATION)
	SetStatus(2)
	終了
End If
Print( sName + " - " + lName)