VBScript-作为管理员的单行

Question

是否可以使用shell.run命令以管理员身份运行指定的程序？

例如：

shell.run(cmd.exe) <---Run this as admin
shell.run(Notepad) <---Run this as normal

我知道我可以执行脚本以管理员身份运行，但这意味着该脚本中的所有内容都以管理员身份执行。

我的另一个选择是分离脚本并以管理员身份运行一个脚本，并在该脚本中包含需要以管理员身份运行的内容，然后调用另一个脚本来运行并正常运行该脚本。

Answer 1

Set oShell = CreateObject("Shell.Application")
oShell.ShellExecute "cmd.exe", , , "runas", 1
oShell.Run "nodepad.exe"

（资料来源：http://social.technet.microsoft.com/Forums/eu/ITCG/thread/310e57f9-2367-4293-9f97-53d0e077aacc）

（更多信息：http://ss64.com/vb/shellexecute.html）

Answer 2

Windows（至少从XP到Win7）有一个runas命令可以满足你的需要。有关详细信息，请参阅here。

因此，您不必运行cmd.exe，而是运行runas.exe，将cmd.exe作为要运行的程序。

Answer 3

试试这个：

Dim ObjShell
Set ObjShell = CreateObject ("WScript.Shell")
ObjShell.Run "runas /K (command goes here) "
ObjShell.Run "notepad.exe"