ShortPath

返回按照 8.3 命名約定轉換的短路徑名。

object.ShortPath

object 應為 File 或 Folder 對象的名稱。

以下代碼舉例説明如何使用 ShortName 屬性：

Sub ShowShortPath（filespec）

Dim fs, f, s

Set fs = CreateObject（"Scripting.FileSystemObject"）

Set f = fs.GetFile（filespec）

s = UCase（f.Name） & "" & "的短路徑名"

s = s & " " & vbCrLf

s = s & "是： " & "" & f.ShortPath & ""

MsgBox s, 0, "短路徑名信息"

End Sub