高手帮忙用vbs编一个按键盘动作的脚本!!!

来源:百度知道 编辑:UC知道 时间:2024/06/08 03:22:04

以下是在Win98下自动安装还原精灵的脚本('后面的内容为注释):

Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.SendKeys "^{esc}" '调用开始菜单
WScript.Sleep 500
WshShell.SendKeys "r" '打开运行对话框
WScript.Sleep 500
WshShell.SendKeys "c:\h\setup.exe" '安装还原精灵(本来可直接用“WshShell.Run "c:\h\setup.exe"”,但那样会装成试用版!)
WScript.Sleep 500
WshShell.SendKeys "{ENTER}"
WScript.Sleep 1000
WshShell.AppActivate "还原精灵21st DEMO" '当前窗口
WScript.Sleep 1000
WshShell.SendKeys "{ENTER}" '注册
WScript.Sleep 500
WshShell.SendKeys "q" '输入使用者
WScript.Sleep 500
WshShell.SendKeys "{TAB}" '移至注册码处
WScript.Sleep 500
WshShell.SendKeys "{q 20}" '输入注册码(20个"q")
WScript.Sleep 500
WshShell.SendKeys "{ENTER}" '确认注册码
WScript.Sleep 500
Ws