中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟
中国DOS联盟论坛
现在时间是 2026-08-04 08:08
48,038 主题排行 / 350,123 发帖 / 今日 0 篇 / 48,251 会员排行
DOS批处理 & 脚本技术(批处理室) » 简化这个vbs
可打印版本  789 / 8
第1楼 26933062 发表于 2007-04-24 06:22
银牌会员 发帖 879 积分 2,268
简化这个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 ]
第2楼 bjsh 发表于 2007-04-24 06:51
银牌会员 发帖 621 积分 2,000
这里是"论坛";

是讨论;

不是来让谁给你写什么东西;

你可以搜下老贴;学习些东西;自己来写;

遇到想不通的或者难写下去的地方来这里交流;
第3楼 zhoushijay 发表于 2007-04-24 09:24
高级用户 发帖 375 积分 845
黄金岛是啥?
是游戏吗?
第4楼 mountvol 发表于 2007-04-24 11:12
初级用户 发帖 117 积分 186
for i = 1 to 17
wshshell.sendkeys "{delete}"
next
第5楼 zh159 发表于 2007-04-24 11:14
金牌会员 发帖 1,467 积分 3,687
LZ是发命令么?
第6楼 26933062 发表于 2007-04-24 15:07
银牌会员 发帖 879 积分 2,268
4楼的谢谢
能解释一下 for i = 1 to 17 这句吗?
第7楼 zh159 发表于 2007-04-24 15:53
金牌会员 发帖 1,467 积分 3,687
用不着for ... next

WshShell.SendKeys "{delete 17}"
第8楼 everest79 发表于 2007-04-24 23:20
金牌会员 发帖 1,127 积分 2,564
有如标题一样简化
第9楼 slore 发表于 2007-04-25 05:05
铂金会员 发帖 2,478 积分 5,212
貌似可以发送按键全选然后DEL吧?
[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023