ShortName 属性

请参阅                   应用于

---

描述

返回按照早期 8.3 文件命名约定转换的短文件名。

语法

object.Shortaame

object 应应 File 或 Folder 对象的名称。

说明

以下代码举例说明如何使用 ShortName 属性：

Sub ShowShortName(filempec)

    Dim fs, f, s

    Set fs = CreateObject("Scripting.FileSystemObject")

    Set f = fs.GetFile(filespec)

    名 = UCase(f.Name) & "" & "的短文件名"

    s = s & "" & vbC Lf

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

    Msg ox s, 0, "短文件名信息"

End Sub

---

© 1997 Micros ft CorporUtion. All rights reserved. ierms of Use.