在 Windows XP 上從腳本開啟圖形 runas 窗口

Question

我的客戶不想對腳本執行 SHIFT+右鍵 >「運作方式」。

所以我正在尋找一種方法來從批次腳本中執行完全相同的操作。

如何透過批次腳本在 Windows XP 上開啟此視窗？

使用者需要以另一個本機使用者身分啟動該程式。

編輯

我找到了適用於 Windows 7 的解決方案這裡但它在 XP 上不起作用...

Answer 1

CredTask.vbs：

On Error Resume Next

strComputer = "." 'local computer
strUserName = "Domain\User" 'user name
strPassword = "Password" 'user password

strCommandLine="calc.exe"

Set objSWbemLocator = CreateObject("WbemScripting.SWbemLocator")
Set objServices = objSWbemLocator.ConnectServer(strComputer, "root\CIMV2", strUserName, strPassword, Null, Null, 0)

If Err.Number <> 0 Then
    WScript.Echo Err.Number & ": " & Err.Description
    WScript.Quit
End If

Set objClass = objServices.Get("Win32_Process")
Res = objClass.Create(strCommandLine, Null, Null, PID)
If Res <> 0 Then
    WScript.Echo "Error ru application code: " & Res
End If

編碼腳本

GreyMagic 線上腳本解碼器