Drives mapping
Oct. 14th, 2009 11:45 pm![[personal profile]](https://www.dreamwidth.org/img/silk/identity/user.png)
on error resume next
set WshNetwork = WScript.CreateObject("WScript.Network")
Drives = Array("D", "E", "F", "H", "I", "J", "K", "L", "M", "N")
For Each Drive in Drives
WshNetwork.MapNetworkDrive Drive & ":", "\\file\" & Drive & "$", False
Next
set WshNetwork = WScript.CreateObject("WScript.Network")
Drives = Array("D", "E", "F", "H", "I", "J", "K", "L", "M", "N")
For Each Drive in Drives
WshNetwork.MapNetworkDrive Drive & ":", "\\file\" & Drive & "$", False
Next