How to restart script by automaticly?

[ocensound]

Ex.

Global $test=1

settest()

func settest()

$test+=1

endfunc

func gettest()

return $test

endfunc

When this script end I want restart script.

How to restart script ?

ps.Don't use loop

thank u

Edited February 19, 2009 by ocensound

[Prab]

Lookup OnAutoItExit opt and the Run() function in the help file.

[ReaImDown]

Lookup OnAutoItExit opt and the Run() function in the help file.

I like shellexecute more

[Robjong]

Hey,

I use this

Func _SelfRestart()
    If @Compiled Then
        Run(FileGetShortName(@ScriptFullPath))
    Else
        Run(FileGetShortName(@AutoItExe) & " " & FileGetShortName(@ScriptFullPath))
    EndIf
    Exit
EndFunc   ;==>_SelfRestart

[ocensound]

Oh thank you so much

[ocensound]

OhOhOh ,I got a problem T^T see this.

Opt("OnExitFunc","dorestart")
AutoItSetOption ("SendKeyDelay",100)
AutoItSetOption ("SendKeyDownDelay",100)
HotKeySet("{PAUSE}","dopause")
HotKeySet("{END}","doexit") 

Func dorestart()
    ConsoleWrite("RESTART"&@CRLF)
    If @Compiled Then
        Run(FileGetShortName(@ScriptFullPath))
    Else
        Run(FileGetShortName(@AutoItExe) & " " & FileGetShortName(@ScriptFullPath))
    EndIf
    Exit
EndFunc

Func dopause()
    $paused=Not $paused
    If $paused=True Then
        ConsoleWrite("PAUSED"&@CRLF)
    ElseIf $paused=False Then
        ConsoleWrite("RESUME"&@CRLF)
    Else
    EndIf
    While $paused
        Sleep(1000)
    WEnd
EndFunc

Func doexit()
    ConsoleWrite("EXIT"&@CRLF)
    Exit
EndFunc

I cann't stop this when I press END clz It away restart -..-

Edited February 21, 2009 by ocensound

[Robjong]

Hey,

That is because you set OnExitFunc to the restart function

Opt("OnExitFunc","dorestart")

Th OnExitFunc function will be called before the script exits, this means in your case that evertime you try to exit the program the restart function gets called.

[Jos]

Something like this?

Global $cancel=0
Opt("OnExitFunc", "dorestart")
AutoItSetOption("SendKeyDelay", 100)
AutoItSetOption("SendKeyDownDelay", 100)
HotKeySet("{PAUSE}", "dopause")
HotKeySet("{END}", "doexit")
MsgBox(1,"test","restarting in 2 seconds",2)

Func dorestart()
    if $cancel then Exit
    ConsoleWrite("RESTART" & @CRLF)
    If @Compiled Then
        Run(FileGetShortName(@ScriptFullPath))
    Else
        Run(FileGetShortName(@AutoItExe) & " " & FileGetShortName(@ScriptFullPath))
    EndIf
    Exit
EndFunc  ;==>dorestart
Func dopause()
    $paused = Not $paused
    If $paused = True Then
        ConsoleWrite("PAUSED" & @CRLF)
    ElseIf $paused = False Then
        ConsoleWrite("RESUME" & @CRLF)
    Else
    EndIf
    While $paused
        Sleep(1000)
    WEnd
EndFunc  ;==>dopause
Func doexit()
    MsgBox(0,"Cancelled","Cancelled")
    $cancel=1
    Exit
EndFunc  ;==>doexit

[ocensound]

Yeah, Thank you looklike easy >,<

but after restart

HotKeySet("{PAUSE}", "dopause")

HotKeySet("{END}", "doexit")

This key doesn't work ;(

Edited February 21, 2009 by ocensound