定时退出脚本怎么做呢？

liongodmien

$timer = @MIN & @SEC
While 1
        TrayTip("","当前分秒：" & @MIN & @SEC & @CRLF & "前面分秒：" & $timer & @CRLF & "前后的分秒之差：" & (@MIN & @SEC)- $timer, 1)
        If (@MIN & @SEC)-$timer > 100 Then Exit
WEnd

liongodmien

原帖由 lxz 于 2008-10-3 22:42 发表


谢谢,你真的是个热心人,再次感谢你.

哦，其实我也是为了让自己能更熟悉的记住与掌握，也大家互相帮助帮助嘛．．．．

lxz

你这是定时退出,我如果把它搞成定时运行程序的话,却会重复运行,要怎么样才能搞成到时只运行一次程序呢?

liongodmien

原帖由 lxz 于 2008-10-3 22:54 发表
你这是定时退出,我如果把它搞成定时运行程序的话,却会重复运行,要怎么样才能搞成到时只运行一次程序呢?

对自身：

If Winexists("Check") Then Exit
AutoitWinsetTitle("Check")

对由脚本程序打开的其它程序：

Dim $Open = 0
------
If $open = 0 Then 
   $Open = Run("*********")
EndIf
----

lxz

原帖由 liongodmien 于 2008-10-3 22:47 发表
[au3]

$timer = @MIN & @SEC
While 1
        TrayTip("","当前分秒：" & @MIN & @SEC & @CRLF & "前面分秒：" & $timer & @CRLF & "前后的分秒之差：" & (@MIN & @SEC)- $timer, 1)
        If (@MIN & @SEC)-$timer > 100  ...

象这段函数我要10秒以后Run("D:\病毒清理免疫程序.exe")的话,要怎么搞?

liongodmien

原帖由 lxz 于 2008-10-4 12:18 发表


象这段函数我要10秒以后Run("D:\病毒清理免疫程序.exe")的话,要怎么搞?

例一：

$timer = @MIN & @SEC
While 1
        TrayTip("","当前分秒：" & @MIN & @SEC & @CRLF & "前面分秒：" & $timer & @CRLF & "前后的分秒之差：" & (@MIN & @SEC)- $timer, 1)
        If (@MIN & @SEC)-$timer >= 10 Then Exit
WEnd
Run("D:\病毒清理免疫程序.exe")

或，更简单的是，只要求停10秒后运行指定程序：
例二：

Sleep(10000)
Run("D:\病毒清理免疫程序.exe")

lxz

原帖由 liongodmien 于 2008-10-4 13:52 发表

例一：
[au3]
$timer = @MIN & @SEC
While 1
        TrayTip("","当前分秒：" & @MIN & @SEC & @CRLF & "前面分秒：" & $timer & @CRLF & "前后的分秒之差：" & (@MIN & @SEC)- $timer, 1)
        If (@MIN & @SEC)-$time ...

If (@MIN & @SEC)-$timer >= 10 Then Exit    这里已经10秒后退出脚本了呀,后面的Run("d:\病毒清理免疫程序.exe")还怎么运行呀?  应该退出循环ExitLoop才行.谢谢你的解答.

[ 本帖最后由 lxz 于 2008-10-4 15:29 编辑 ]

liongodmien

原帖由 lxz 于 2008-10-4 15:07 发表


If (@MIN & @SEC)-$timer >= 10 Then Exit    这里已经10秒后退出脚本了呀,后面的Run("d:\病毒清理免疫程序.exe")还怎么运行呀?  应该退出循环ExitLoop才行.谢谢你的解答.

呵呵，直接复制过来没注意到这个，不好意思！

superflq

学习了，谢谢liongodmien

s20305

好同志！好战友！

jakykuang

金牌会员利害啊,我想定时运行update.exe这个程序,是否这样写,在两次运行程序的过程中,程序会点用系统资料吗
If Winexists("update") Then Exit
AutoitWinsetTitle("update")
$timer = @MIN & @SEC
While 1
    TrayTip("","当前分秒：" & @MIN & @SEC & @CRLF & "前面分秒：" & $timer & @CRLF & "前后的分秒之差：" & (@MIN & @SEC)- $timer, 1)
    If (@MIN & @SEC)-$timer >= 10 Then Exit
WEnd
Run("D:\update.exe")

YoDe

很好 很强大哈 学习了

9373880

不断的学习