happyxxdhaha

Set ws = CreateObject("WScript.Shell")
Set oExec = ws.Exec("cmd.exe")
oexec.StdIn.WriteLine "runas /user:username setup.bat"
oexec.StdIn.WriteLine "password"
复制代码

2楼的这段代码不行。

Frank.Mu

路过，感觉不错，顶一下！