2012-07-12 18 views

Respuesta

8

¿Ha intentado utilizar ShellExecute?

RunCmdElevated.vbs

Set objShell = CreateObject("Shell.Application") 
objShell.ShellExecute "cmd.exe", "/k echo test", "", "runas", 1 

RunCmdElevated.vbs wscript

da

prueba

C: \ Windows \ system32>

en una nueva ventana. El "1" es el modo de vista

http://ss64.com/vb/shellexecute.html

+0

Cuando hago esto me sale un cuadro de diálogo Control de cuentas de usuario. ¿Cómo tomo ese diálogo y hago clic en 'Sí' usando SendKeys? – CAB

Cuestiones relacionadas