Windows – runas com senha

Script VBS

Set CmdShell= Wscript.CreateObject(“Wscript.Shell”)
CmdShell.Run “C:\Windows\System32\runas.exe /user:COMPUTADOR\administrador “”cmd /c ^C:\Windows\System32\recdisc.exe^ && exit”””
Wscript.Sleep 100
CmdShell.SendKeys “SENHA~”
Wscript.Quit