1
我想在映射网络驱动器之前检查网络驱动器是否有映射。 我使用此代码映射驱动器。如何查看地图网络驱动器连接?
Dim network = New IWshNetwork_Class()
network.MapNetworkDrive("Z:", ServerDc, Type.Missing, username, pwd)
我想在映射网络驱动器之前检查网络驱动器是否有映射。 我使用此代码映射驱动器。如何查看地图网络驱动器连接?
Dim network = New IWshNetwork_Class()
network.MapNetworkDrive("Z:", ServerDc, Type.Missing, username, pwd)
IWshNetwork_Class
似乎是Windows脚本宿主对象模型COM库中的一个类。
Dim Network As IWshRuntimeLibrary.IWshNetwork_Class
Dim Drives As IWshRuntimeLibrary.IWshCollection_Class
Drives = Network.EnumNetworkDrives
For DriveCounter As Long = 0 To Drives.Count – 1 Step 2
MsgBox(Drives.Item(DriveCounter) & " is mapped to " & Drives.Item(DriveCounter + 1))
Next
看一看this PDF更多信息...
错误发生在计数-1。 ' - '无效。 – user2562841
看到我编辑的代码,在'-'和'1'之间加了一个空格。 –