标题: 为什么这段VBS代码不可以延时？ [打印本页]

---

作者: 313885174     时间: 2008-2-6 12:19    标题: 为什么这段VBS代码不可以延时？

On Error Resume Next
Dim timediff,exepath
timediff=5000
exepath="a.txt"
Set WshShell=createobject("Wscript.Shell")
while true
call WshShell.Run(exepath ,1,True)
' call WshShell.Run(exepath,vbhide,True)
WScript.sleep timediff*1000
wend
Set WshShell=Nothing


上面写的是延时5秒的啊  可是一打开就直接运行了```
是代码中有错误吗？

---

作者: slore     时间: 2008-2-6 12:22
timediff*1000

5000秒！！！

而且你的代码貌似是先打开再延时的……

---

作者: hackhd     时间: 2008-2-8 02:53
吐血。。就用那SLEEP丢第一行不行啊？看它敢不延时

---

作者: fennng     时间: 2008-2-8 10:30
WScript.sleep 1000
我直接这样用,你写得好复杂