Returns the short path used by programs that require the earlier 8.3 file naming convention.
Syntax
object.ShortPath
The object is always a File or Folder object.
Remarks
The following code illustrates the use of the ShortName property with a File object:
Function ShowShortPath(filespec)
Dim fso, f, s
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFile(filespec)
s = "The short path for " & UCase(f.Name) & "<BR>"
s = s & "is: " & f.ShortPath
ShowShortPath = s
End Function