Mis clientes no quieren hacer MAYÚS+clic derecho > "Ejecutar como" en un script.
Entonces estoy buscando una manera de hacer exactamente lo mismo desde un script por lotes.
¿Cómo abrir esta ventana en Windows XP desde un script por lotes?
El usuario debe iniciar el programa como otro usuario local.
EDITAR
Encontré una solución para Windows 7.aquípero no funciona en XP...
Respuesta1
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