

CODE: [Copy to clipboard]论坛上搜索的这段代码也不错,可以在win2003上测试通过。但是当我想输入一个24位的密码时就出错了,不知道是不是sendkey本身的限制Dim oShell
Set oShell = WScript.CreateObject("WScript.Shell")
oshell.Run "runas /profile /user:test cmd.exe"
wscript.sleep 400
oshell.SendKeys "a"
wscript.sleep 500
oshell.SendKeys "{ENTER}"
| 欢迎光临 中国DOS联盟论坛 (http://cndos.fam.cx/forum/) | Powered by Discuz! 2.5 |