这是我的示例测试代码:
On Error Resume Next
Dim localServiceKey : localServiceKey = CreateObject("WScript.Shell").RegRead("HKEY_USERS\s-1-5-19\")
'On error, elevate the script
If Err.Number <> 0 Then
CreateObject("Shell.Application").ShellExecute WScript.FullName, """" & WScript.ScriptFullName & """ /elevate", "", "runas", 1
Err.Clear
WScript.Quit()
End If
...INSERT CODE BELOW...
如果我从本地驱动器或使用UNC访问的网络驱动器(即 \\ server \ folder )运行此自举式VBS脚本文件,它将正常工作。
但是,如果我从映射的驱动器(即 Z:\ folder )运行它,则在UAC提示后,我会收到一条错误消息:
找不到脚本文件...
是否存在允许VBS脚本文件从映射的网络驱动器运行的解决方法?
注意:我正在Windows 10 x64上测试此代码。
谢谢您的建议。