‎Jan 15, 2004 05:30 AM
set FSO = CreateObject("Scripting.FileSystemObject")For more information, please refer to FileSystemObject on MSDN.
' read ProgramFilesFolder property
set fo = FSO.GetFolder(Property("ProgramFilesFolder"))
' convert to short path name from long path name
' assign the short path name to a property
Property("SP_PROGRAMFILESFOLDER") = fo.ShortPath
set fo = nothing
set FSO = nothing
‎Jan 15, 2004 10:21 AM
‎Jan 15, 2004 12:47 PM
‎Jan 16, 2004 01:51 AM