VBScript中如何检查什么驱动器映射到

问题描述:

我想检查是否有驱动器映射到一个特定的点,如果它不存在映射。我如何检查驱动器映射的位置?如果它映射到我想去的地方(C:\folder现在)VBScript中如何检查什么驱动器映射到

我打算停止脚本,如果它映射到错误的地方,并使用subst D: C:\folder如果它没有被映射(这是我想要的),或者只是在继续从http://msdn.microsoft.com/en-us/library/t9zt39at(v=vs.85).aspx

Set WshNetwork = WScript.CreateObject("WScript.Network") 
Set oDrives = WshNetwork.EnumNetworkDrives 
Set oPrinters = WshNetwork.EnumPrinterConnections 

WScript.Echo "Network drive mappings:" 

For i = 0 to oDrives.Count - 1 Step 2 
    WScript.Echo "Drive " & oDrives.Item(i) & " = " & oDrives.Item(i+1) 
Next 

WScript.Echo 

WScript.Echo "Network printer mappings:" 
For i = 0 to oPrinters.Count - 1 Step 2 
    WScript.Echo "Port " & oPrinters.Item(i) & " = " & oPrinters.Item(i+1) 
Next 
采取