Simple Crash Detector

[Vadersapien]

Just an example of a simple crash detector:

Only disadvantage is that you must call CleanUp() every time before you use Exit.

#include <GUIConstants.au3>

Opt('TrayIconHide', True)

$AppCrash = IniRead('CrashData.ini', 'CrashData', 'appcrash', 'Unknown')

If $AppCrash = 'true' Then
    MsgBox(-1, 'Info', 'The script crashed last time it was used')
EndIf

IniWrite('CrashData.ini', 'CrashData', 'AppCrash', 'true')

GUICreate('Crash Detector', 250, 40)

$CrashSim = GUICtrlCreateButton('Simulate Crash', 5, 5, 115, 30)
$Exit = GUICtrlCreateButton('Exit', 130, 5, 115, 30)

GUISetState()

While 1
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            CleanUp()
        Case $Exit
            CleanUp()
        Case $CrashSim
            Exit
    EndSwitch
WEnd

Func CleanUp()
    GUIDelete()
    IniWrite('CrashData.ini', 'CrashData', 'AppCrash', 'false')
    Exit
EndFunc

Edited February 4, 2010 by Vadersapien

[MrCreatoR]

It will not show any data about the crash, after the script crashed nothing will be writen to your ini-file.

[James]

What is this, I don't even...

[Mat]

  On 2/4/2010 at 10:41 PM, 'JamesBrooks said:

What is this, I don't even...

Just checks at program start if the program exitted correctly last time.