Create a virtual drive (VBScript)

This code can be found in Chapter 7 of Windows XP Cookbook

Purchase XP Cookbook or Networking Recipes for only $25 plus shipping! While supplies last.

Find out how to download all of the VBScript code from this site.

' From the book, "Windows XP Cookbook"
' ISBN: 0596007256

' ------ SCRIPT CONFIGURATION ------
strDrive = "<Drive>" ' e.g. e:
strPath = "<Path>" ' e.g. c:\scripts

' This assumes subst is in your PATH, if not, fully qualify
' the path to the command here:
strCommand = "subst " & strDrive & " " & strPath
' ------ END CONFIGURATION ---------
set objWshShell = WScript.CreateObject("WScript.Shell")
intRC = objWshShell.Run(strCommand, 0, TRUE)
if intRC <> 0 then
 WScript.Echo "Error returned from running the command: " & intRC
 WScript.Echo "Command attempted: " & strCommand 
else
 WScript.Echo "Command executed successfully."
end if

This code has been viewed 2334 times.

New from the creators of TechTasks.com: StatSheet.com