SetupHDDmonitor.au3

;----------------------------------------------
; SetupHDDmonitor.au3
; install script
; Wolfgang Führer
; 14.05.2007  -  11:15:14,50
;----------------------------------------------
 
If Not IsAdmin() Then
    MsgBox(16, "", "Für die Installation werden Administratorrechte benötigt!   ", 5)
    Exit (1)
EndIf
 
DirCreate(@ProgramFilesDir & "\HDDmonitor")
FileInstall("H:\AutoIt_Files\Work\HDDmonitor\HDDmonitor.exe",@ProgramFilesDir & "\HDDmonitor\",1)
 
$errorval = RegWrite("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run", _
                     "HDDmonitor", "REG_SZ", @ProgramFilesDir & "\HDDmonitor\HDDmonitor.exe")
If $errorval = 0 Then 
	MsgBox(0,"HDD Monitor","Programmstart konnte nicht in die Registry eingetragen werden" & _
	                       @crlf & @crlf & "Abbruch der Installation!")
	Exit
EndIf
 
run(@ProgramFilesDir & "\HDDmonitor\HDDmonitor.exe",@ProgramFilesDir & "\HDDmonitor")
 
MsgBox(64,"HDD Monitor","Installation abgeschlossen." & @crlf & @crlf & _
                        "Künftig wird ihr Eventlog nach Festplattenfehlern durchsucht.",10)
 
exit(0)