VBS映射网络驱动器 映射网络驱动器

Dim objNetwork
Set objNetwork = CreateObject("Wscript.Network")
if objNetwork.EnumNetworkDrives.count=0 then 'objNetwork.EnumNetworkDrives.count 判断网络驱动器是否存在
objNetwork.MapNetworkDrive "z:","\\192.168.0.100\MSlearn",true,"panda","123" '创建网络驱动器
end if
Set colDrives=nothing
set objNetwork=nothing

　　 欢迎加入QQ技术群聊：70539804