中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名：www.cn-dos.net　论坛域名：www.cn-dos.net/forum

游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟

中国DOS联盟论坛
现在时间是 2026-08-06 14:15

共 48,039 主题排行 / 350,124 发帖 / 今日 0 篇 / 48,251 会员排行

DOS批处理 & 脚本技术（批处理室） » [求助]VBS延时(已经解决,谢谢大家!)

可打印版本　2,232 / 8

第1楼　ttytxz	发表于 2007-11-19 11:07
初级用户　发帖 16　积分 44
[求助]VBS延时(已经解决,谢谢大家!) 各位大侠,请帮我在下面的代码里加一个延时的代码:谢谢! Set oshell=CreateObject("wscript.shell") oshell.SendKeys "dzh2.exe" (我希望能够先运行上面的代码,延时15秒钟后再运行下面的代码,谢谢) Set oshell=CreateObject("wscript.shell") oshell.SendKeys "%{F6}" Set oshell=CreateObject("wscript.shell") oshell.SendKeys "^{ENTER}" Set oshell=CreateObject("wscript.shell") oshell.SendKeys "%{F6}" Set oshell=CreateObject("wscript.shell") oshell.SendKeys "0061" Set oshell=CreateObject("wscript.shell") oshell.SendKeys "^{ENTER}" [ Last edited by ttytxz on 2007-11-22 at 11:01 PM ]

第2楼　lxmxn	发表于 2007-11-19 13:48
版主　发帖 4,938　积分 11,386
延时15秒：wscript.sleep 15000

第3楼　ttytxz	发表于 2007-11-19 14:43
初级用户　发帖 16　积分 44
加入以后软件运行不了

第4楼　lxmxn	发表于 2007-11-19 14:51
版主　发帖 4,938　积分 11,386
是vbs脚本吗？

第5楼　ttytxz	发表于 2007-11-19 15:05
初级用户　发帖 16　积分 44
是的

第6楼　lxmxn	发表于 2007-11-19 15:47
版主　发帖 4,938　积分 11,386
我测试没问题，不知道你测试的代码是怎么样的？

第7楼　sonicandy	发表于 2007-11-21 21:54
中级用户　发帖 91　积分 273
oshell.SendKeys "dzh2.exe" => oshell.run "dzh2.exe", 1, false

第8楼　Xdao	发表于 2007-11-21 23:17
新手上路　发帖 7　积分 19
Set oshell=CreateObject("wscript.shell") oshell.run "dzh2.exe" '这里好象要把路径写对好象不能包含中文 wscript.sleep 15000 oshell.SendKeys "%{F6}" oshell.SendKeys "^{ENTER}" oshell.SendKeys "%{F6}" oshell.SendKeys "0061" oshell.SendKeys "^{ENTER}"

第9楼　ttytxz	发表于 2007-11-22 12:18
初级用户　发帖 16　积分 44
已经解决,谢谢大家! 把文件放在想要运行的程序同一个文件夹的情况下不用写路径也可以.

[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023