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

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

Symbian OS および Windows で有効です。

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

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

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

longFileName

これは入力パラメータです。 短縮ファイル名（8.3 表記法）に変換されるファイル名です。

shortFileName

これは出力パラメータです。変換されたファイル名を受け取ります。

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

例： GetShortFileName 関数

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

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)