(PWS4 IIS4 IIS5)
ShortName — 従来の 8.3 形式のファイル名が必要なプログラムのために、短いファイル名を返します。
構文
object.ShortName
パラメータ
- object
- Folder オブジェクトを指定します。
戻り値
ファイル名を返します。
説明
ファイル名が8文字よりも長い場合、チルダ「~」を使用して8文字に短縮して返します。
例
JScript
1 2 3 4 5 6 7 8 9 10 | function ShowShortName(filespec) { var fso, f, s; fso = new ActiveXObject("Scripting.FileSystemObject"); f = fso.GetFile(filespec); s = "ファイル名 : " + "" + f.Name; s += "" + "<br />"; s += "短いファイル名 : " + "" + f.ShortName + ""; return(s); } |
VBScript
1 2 3 4 5 6 7 8 | Function ShowShortName(filespec) Dim fso, f, s Set fso = CreateObject("Scripting.FileSystemObject") Set f = fso.GetFile(filespec) s = "ファイル名 : " & "" & UCase(f.Name) & "" & "<br />" s = s & "短いファイル名 : " & f.ShortName ShowShortName = s End Function |