Obtain the full path to any of the special Windows folders.
Syntax strMyPath = WshShell.SpecialFolders("strFolderName") or strMyPath = WshShell.SpecialFolders.Item("strFolderName") Arguments: strFolderName : One of the following special folders (not all are available to all flavors of Windows) AllUsersDesktop AllUsersStartMenu AllUsersPrograms AllUsersStartup Desktop Favorites Fonts MyDocuments NetHood PrintHood Programs Recent SendTo StartMenu Startup Templates Returns: strMyPath : The full path to the special folder returns NULL if the folder is not available. Examples ' Return the full path to the Windows Desktop Set WshShell = Wscript.CreateObject("Wscript.Shell") StrMyDesktop = WshShell.SpecialFolders("Desktop") MsgBox StrMyDesktop ' List all special folders For Each strFolder In WshShell.SpecialFolders MsgBox strFolder Next
"An artist who was once known as Prince
On the stage he would wiggle and mince
And then, for a giggle, He changed his name to a squiggle
And nobody's heard of him since" - Tim
Brooke-Taylor
Related commands:
Equivalent Windows NT command: