循环为什么会暂停

sjfff99

$adr = "d:\game"
$i = 0
While $i <= 2
        If FileExists ($adr) Then
                Sleep(10)
    DirRemove("d:\game", 1)
        Sleep(10)
        DirCreate("d:\game")
    ;$i = $i + 1
        Sleep(10000)
        Else
        MsgBox(4096,"文件路径不对!","请联系管理员QQ:358340779")
        EndIf
WEnd

;让它无限循环的来删除D盘下的游戏目录.但有时游戏目录在自动下载时.就不会在删了.暂停了,要重新打开才行.
;这人要怎么处理下.谢谢,让他一直自动删除,10秒删一次,不要暂停.

papapa314

回复 1# sjfff99

papapa314

回复 1# sjfff99
while $i<=2这样程序就只循环三次，跟其他没关系

lixiaolong

DirRemove有返回值，利用返回值判断成功或失败.

代码改成这样试试：
$adr = "d:\game"
While 1
    If FileExists ($adr) Then
                Sleep(10)
  $error =  DirRemove($adr, 1)
如果删除失败 (这里的3行你自己加代码吧)
继续循环
如果成功
Sleep(10)
        DirCreate("d:\game")
        Sleep(10000)
        Else
        MsgBox(4096,"文件路径不对!","请联系管理员QQ:358340779")
        EndIf
WEnd

lhr

While 1
.....
WEnd  就可以了，不需要 $i 变量的啊

3mile

是和自己过不去还是和电脑过不去？
while 1
If FileExists ($adr) Then
DirRemove("d:\game", 1)
DirCreate("d:\game")
wend

sjfff99

回下2楼的兄弟。

while $i<=2
但是我后面的$i =$i+1  注销了。所以$i 的一直是0，无限循环的。

sjfff99

是和自己过不去还是和电脑过不去？
while 1
If FileExists ($adr) Then
DirRemove("d:\game", 1)
DirCr ...
3mile 发表于 2011-2-26 22:56

这样不加延时。一直循环。电脑会不会死机呀。。
加了其它的是，路径不对要报下错。要不别人也不知道他的路径对不。
-----------------------------------------------------------------------------
我把里面的sleep 10和那些延时去了。现在没有发现暂停。在试试看吧。谢谢上面的兄弟了。

3mile

这样不加延时。一直循环。电脑会不会死机呀。。
加了其它的是，路径不对要报下错。要不别人也不知 ...
sjfff99 发表于 2011-2-26 23:05

sorry,是我不对。
你这段代码应该是和自己过不去吧。
建立一个死循环，循环里不断的删除目录后又建立目录。非常不理解楼主的思维，为什么要不停的建立目录呢？

AdlibRegister("_del",10*1000)
_del()
While 1
        Sleep(10)
WEnd

Func _del()
        If FileExists("d:\game") Then DirRemove("d:\game",1)
EndFunc

sjfff99

我也不想呀。这个目录里一直在下载广告。能不能做到只删这个目录下的所有文件和文件加
不用删这个文件加。路径不对提示报错。

都市浪子666

先把d:\game  删除了。
然后再在D盘下新建个文件，文件名为(game)    ,之后就不能再生成game的目录了，这样方便省事