Trying to make a simple anticrash application

[Hakuji 0]

Hi... i would to create a simple anticrash application that restart an exe if it isn't running.

like "if notepad.exe is not running then run notepad.exe"

i tried this:

while 1
if WinActive("Blocco Note") Then
    $d=1
Else
    Run("notepad.exe")
endif
wend

But this opens Notepad alse if it is open.

Bye

[Xenobiologist 47]

HI,

try something like

While 1
    Sleep(200)
    _checkForRunningApp("notepad.exe", "notepad.exe")
WEnd

Func _checkForRunningApp($s_App, $AppPath)
    If ProcessExists($s_App) = 0 Then
        Run($AppPath)
    EndIf
EndFunc

So long,

Mega

[Briegel 0]

Another possibility is using 'AdlibEnable()'.

AdlibEnable("_CheckNotepad") ; look at helpfile for timer settings

While 1
    Sleep(100)
WEnd

Func _CheckNotepad()
    If ProcessExists("notepad.exe") = 0 Then Run("notepad.exe")
EndFunc

[Hakuji 0]

Thousand Thanks guys. I know this is a very simple script but i don't know every command of autoit and i think it is very usefull for many programs

Bye. Thanks again.

Hakuji 8)