Как передать аргументы скрипту, который автоматически запускается от имени администратора?

Question

Как передать аргументы скрипту, который автоматически запускается от имени администратора?

If WScript.Arguments.Count >= 1 Then
  Command1 = WScript.Arguments.Item(0)
End If

If WScript.Arguments.Named.Exists("elevated") = False Then
  CreateObject("Shell.Application").ShellExecute "wscript.exe", """" & _
    WScript.ScriptFullName & """ /elevated", "", "runas", 1
  WScript.Quit
End If

WScript.Echo Command1

1

vbscript elevated-privileges

Источник

user3732138 01 ноя '15 в 20:29

1 ответ

Решение

Другие вопросы по тегам vbscript elevated-privileges

user1630171 02 ноя '15 в 15:50 2015-11-02 15:50 · Accepted Answer · 2015-11-02 15:50

Добавьте аргументы в список аргументов, который у вас уже есть (/elevated):

If WScript.Arguments.Count >= 1 Then
  Command1 = WScript.Arguments.Item(0)
End If

If WScript.Arguments.Named.Exists("elevated") = False Then
  CreateObject("Shell.Application").ShellExecute "wscript.exe", """" & _
    WScript.ScriptFullName & """ " & Command1 & " /elevated", "", "runas", 1
  WScript.Quit
End If

WScript.Echo Command1