如何在VBScript中指定「以最高權限運行」？

當我使用GUI任務計劃程序時，我可以輕鬆地檢查「以最高權限運行」複選框。如何在VBScript中指定「以最高權限運行」？

但是，我在VBScript命令行中也沒有找到這樣的選項。

有沒有辦法從VBScript做到這一點？

如何添加這個腳本這兩個功能？

enter image description here

例的VBScript：http://msdn.microsoft.com/en-us/library/aa383665%28v%3DVS.85%29.aspx

特權：http://msdn.microsoft.com/en-us/library/windows/desktop/aa382076%28v=vs.85%29.aspx

來源

2013-11-15 user2976880

如果你問如何交互的管理模式下運行VB腳本，你只需要在命令行運行CSCRIPT那已經在「管理員模式」下運行。例如，單擊開始，鍵入cmd，等待幾秒鐘...，右鍵單擊cmd.exe並選擇「以管理員身份運行」。然後，當您從該命令行運行CSCRIPT時，它將以最高權限運行。請注意，您必須先使用管理員用戶帳號登錄。

或者你問你如何自動創建VBScript中的新計劃任務與這些選項設置？

來源

2013-11-16 17:10:34 NYCdotNet

是的！ THIS => 或者你問你如何在VBScript中自動創建新的計劃任務並設置這些選項？ – user2976880

此VBScript代碼自動執行SchTasks.exe程序，並應演示您想要執行的操作。爲了得到交換機的列表與schtasks的創建任務，你可以運行這個命令：

schtasks.exe /create /?

你仍然需要運行管理命令提示符下面的腳本能夠創建任務與「最高」特權。另外，如果您希望使用系統帳戶以外的帳戶，則應使用/ RP開關。如果您完全自動化它，您可能還希望使用/ F開關強制覆蓋現有任務。否則，它可能會在等待用戶輸入時掛起。

Option Explicit 

Dim WshShell, strWinDir, strCmdLine, lngExitCode 
Const OpenAsCurrentWindowIsOpened = 10, WaitForExit = True 

Set WshShell = CreateObject("WScript.Shell") 
strWinDir = WshShell.ExpandEnvironmentStrings("%WINDIR%") 

strCmdLine = strWinDir & "\System32\SCHTASKS.exe /create /SC DAILY /TN ""My VBScript Task"" /TR """ & strWinDir & "\System32\calc.exe"" /RL HIGHEST /RU ""NT AUTHORITY\SYSTEM""" 

lngExitCode = WshShell.Run(strCmdLine, OpenAsCurrentWindowIsOpened, WaitForExit) 

If lngExitCode = 0 Then 
    WScript.Echo "Success" 
Else 
    WScript.Echo "Failed with error code " & CStr(lngExitCode) 
End If

來源

2013-11-16 21:11:29 NYCdotNet

工作XP/Vista/Windows 7？（x86/x64兩者） – user2976880

爲什麼你不試試？我希望這可以在Vista和Windows 7上運行。由於XP中不存在「最高權限」的概念，因此您可能需要進行調整。 – NYCdotNet

如何在VBScript中指定「以最高權限運行」？

回答

相關問題