ShortName

ShortName，返回按照早期 8.3 檔案命名約定轉換的短檔案名稱。

描述

語法

object.ShortName

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

說明

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

Sub ShowShortName(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.ShortName & ""

MsgBox s, 0, "短檔案名稱信息"

End Sub