前のトピック: GetFileTime - ファイル作成日、最終アクセス日、または最終変更日を返す次のトピック: GetShortFileName - ロング ファイル名を短縮ファイル名に変換する


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

Windows で有効

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

関数の形式

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

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

longFileName

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

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

例:

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

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)