Q: A: '第一部分:删除所有映射网络驱动器 Set objNet = CreateObject("Wscript.Network") '第二部分:等待第一部分删除所有映射网络驱动器完成,约1秒钟 WScript.Sleep 1000 '第三部分:映射并重命名网络驱动器
'映射网络驱动器 '重新命名 End Function NetworkDrivesName "\\server\CorpFS","z:","公司文件夹" |
Q: A: '第一部分:删除所有映射网络驱动器 Set objNet = CreateObject("Wscript.Network") '第二部分:等待第一部分删除所有映射网络驱动器完成,约1秒钟 WScript.Sleep 1000 '第三部分:映射并重命名网络驱动器
'映射网络驱动器 '重新命名 End Function NetworkDrivesName "\\server\CorpFS","z:","公司文件夹" |