完整的 Folder 对象参考手册ShortPath 属性用于返回指定文件或文件夹的短路径（8.3 文件命名公约）。
语法
FileObject.ShortPath
FolderObject.ShortPath
FolderObject.ShortPath
针对 File 对象的实例
<%
dim fs,f
set fs=Server.CreateObject("Scripting.FileSystemObject")
set f=fs.GetFile("c:asp_test_webhitcounterfile.txt")
Response.Write("Path: " & f.Path)
Response.Write("<br>ShortPath: " & f.ShortPath)
set f=nothing
set fs=nothing
%>
输出：
Path: C:asp_test_webhitcounterfile.txt
ShortPath: C:ASP_TE~1HITCOU~1.TXT
dim fs,f
set fs=Server.CreateObject("Scripting.FileSystemObject")
set f=fs.GetFile("c:asp_test_webhitcounterfile.txt")
Response.Write("Path: " & f.Path)
Response.Write("<br>ShortPath: " & f.ShortPath)
set f=nothing
set fs=nothing
%>
输出：
Path: C:asp_test_webhitcounterfile.txt
ShortPath: C:ASP_TE~1HITCOU~1.TXT
针对 Folder 对象的实例
<%
dim fs,fo
set fs=Server.CreateObject("Scripting.FileSystemObject")
set fo=fs.GetFolder("c:asp_test_web")
Response.Write("Path: " & fo.Path)
Response.Write("<br>ShortPath: " & fo.ShortPath)
set fo=nothing
set fs=nothing
%>
输出：
Path: C:asp_test_web
ShortPath: C:ASP_TE~1
dim fs,fo
set fs=Server.CreateObject("Scripting.FileSystemObject")
set fo=fs.GetFolder("c:asp_test_web")
Response.Write("Path: " & fo.Path)
Response.Write("<br>ShortPath: " & fo.ShortPath)
set fo=nothing
set fs=nothing
%>
输出：
Path: C:asp_test_web
ShortPath: C:ASP_TE~1
完整的 Folder 对象参考手册其他扩展