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.
Examples
The following code illustrates the use of the ShortName property with a File object.
Function ShowShortPath(filespec)
Dim fs, f, s
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFile(filespec)
s = "The short path for " & "" & UCase(f.Name)
s = s & "" & vbCrLf
s = s & "is: " & "" & f.ShortPath & ""
Debug.Print s
End Function
Run this code in Immediate Window:
Debug.Print ShowShortPath("D:\helloworld.txt")
Result:
The short path for HELLOWORLD.TXT
is: D:\HELLOW~1.TXT