我们目前正在从使用批处理登录脚本转向使用 VBScript。
我们应该如何在 VBScript 批处理文件中写入以下几行才能达到相同的效果?
net use p: \\server\%username%$ /persistent:yes
任何想法都将不胜感激!
答案1
Dim WshNetwork, WshShell, username
set WshShell = WScript.CreateObject("WScript.Shell")
username = WshShell.ExpandEnvironmentStrings("%username%")
Set WshNetwork = WScript.CreateObject("WScript.Network")
WshNetwork.MapNetworkDrive "P:", "\\Server\" & username, True