【已解决】如何中途结束循环脚本中语句，然后重头开始循环？

leibin0121

菜鸟请教各位大侠，如何在while```````wend  脚本循环过程中，当脚本在运行过程中出错，怎么实现，在出错的地方停止运行后面的脚本，再从开头继续循环脚本？用什么命令，怎么用？清高手指点。

sanmoking

ContinueLoop [循环等级]

liufenglg

重新运行程序?

飘云

ContinueLoop是跳过这次循环，但是不是重新开始
要重新开始的话，我的思路是可以将循环注册为一个函数，如AdlibRegister ("_xunhuan",1000)，然后函数开始第一行AdlibUnRegister反注册一下，这是让函数生效一次（如果不反注册，AdlibRegister会导致每过一段时间就运行一次函数），后面紧接着就是一个while```````wend，判断错误然后想跳出再重新运行时，先再次注册此函数，也就是再次开始运行这个循环了，紧接着跟return，即退出当前在运行的函数。

xcycom

caodongchun

菜鸟请教各位大侠，如何在while```````wend  脚本循环过程中，当脚本在运行过程中出错，怎么实现，在出错的 ...
leibin0121 发表于 2010-9-30 11:19

首先你说的出错在哪里体现？@error？ 基于某种条件的判断？
形如：

Dim $x='OK',$n=0,$z

While 1
    ConsoleWrite($n&@CRLF)
    $n = $n+1
    Sleep(500)
    If $n>10 Then Dim $z[1]
    If Not IsArray($z) Then ContinueLoop
    ConsoleWrite($x&@CRLF)

WEnd

当$n小于等于10时我们就认为错误，不继续，当满足条件继续？

xianhou

回复 1# leibin0121


    问题描述不清楚。