中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客: 注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 简化这个vbs

26933062
银牌会员

积分 2268
发帖 879
注册 2006-12-19
状态离线

『楼主』: 简化这个vbs

我有一个自动登陆黄金岛的vbs如下
QQPath="D:\安装的程序\HJD\H_Loader.exe"
Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.Run QQPath
WScript.Sleep 20000
WshShell.SendKeys "+{TAB}"
WshShell.SendKeys "+{TAB}"
WshShell.SendKeys "{delete}"
WshShell.SendKeys "{delete}"
WshShell.SendKeys "{delete}"
WshShell.SendKeys "{delete}"
WshShell.SendKeys "{delete}"
WshShell.SendKeys "{delete}"
WshShell.SendKeys "{delete}"
WshShell.SendKeys "{delete}"
WshShell.SendKeys "{delete}"
WshShell.SendKeys "{delete}"
WshShell.SendKeys "{delete}"
WshShell.SendKeys "{delete}"
WshShell.SendKeys "{delete}"
WshShell.SendKeys "{delete}"
WshShell.SendKeys "{delete}"
WshShell.SendKeys "{delete}"
WshShell.SendKeys "{delete}"
WshShell.SendKeys "abcde"
WScript.Sleep 2000
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "1234567"
WScript.Sleep 200
请问其中的WshShell.SendKeys "{delete}"这一句有办法简化吗?
还有就是删除键怎么表示

[ Last edited by 26933062 on 2007-4-23 at 09:38 PM ]

2007-4-24 06:22