Hijackthis Logfile automatisch bei http://www.hijackthis.de/ einfügen

[autoit]

Run("HijackThis.exe")
WinWaitActive("HijackThis - v1.99.1")
ControlClick("HijackThis - v1.99.1", "Do a system scan and save a logfile",100)
WinWaitActive("hijackthis.log - Editor")
Send("^a")
Send("^c")
Send("^s")
WinClose("hijackthis.log - Editor")
WinClose("HijackThis - v1.99.1")
If WinExists("[CLASS:MozillaUIWindowClass]") Then
WinActivate("[CLASS:MozillaUIWindowClass]")
EndIf
Run("C:\Programme\Mozilla Firefox\firefox.exe http://www.hijackthis.de/")
WinWait("HijackThis Logfileauswertung - Mozilla Firefox")
WinWaitActive("HijackThis Logfileauswertung - Mozilla Firefox")
Send("{Tab}")
Send("^a")
Send("{DEL}")
Send("^v")
Send("{Tab}")
Send("{PGDN 5}")
MouseMove (625, 790)

[/autoit]

[autoit]

#cs ----------------------------------------------------------------------------

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

AutoIt Version: 3.3.12.0
Author: m47
Version: 1.2

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

Script Function:
Template AutoIt script.

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

#ce ----------------------------------------------------------------------------

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

; Script Start - Add your code below here

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

#include <Misc.au3>

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

Opt("MustDeclareVars", 1) ;1 = Variable muss deklariert werden

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

Global $Script_Name = "Hijackthis"

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

If _Singleton($Script_Name,1) = 0 Then
Sound() ;
Exit
EndIf

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

;Tastenkombination
Dim $Alles_markieren = "^a"
Dim $Kopieren = "^c"
Dim $Speichern = "^s"
Dim $Einfuegen = "^v"

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

;Fenster Info
Dim $HijackThis_Version = "2.0.4"
Dim $HijackThis_Path = "D:\_Sammlung Windows 7\Sicherheit\HijackThis " & $HijackThis_Version & "\HijackThis " & $HijackThis_Version & ".exe"
Dim $HijackThis_Title = "Trend Micro HijackThis - v" & $HijackThis_Version

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

Dim $HijackThis_Button_Name = "Do a system scan and save a logfile"
Dim $HijackThis_Button_ID = 106

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

Dim $HijackThis_Log_Title = "hijackthis.log - Editor"

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

Dim $Firefox_Path = "C:\Program Files (x86)\Mozilla Firefox\firefox.exe"
Dim $Firefox_Class = "[CLASS:MozillaWindowClass]"

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

Dim $Website_HijackThis_Logfileauswertung_Path = "http://www.hijackthis.de/"
Dim $Website_HijackThis_Logfileauswertung_Title = "HijackThis Logfileauswertung"

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

;Start
;schliesst alle HijackThis- und HijackThis.log Fenster
Local $Timer = TimerInit()
If WinExists($HijackThis_Title) Or WinExists($HijackThis_Log_Title) Then ;prüft ob ein HijackThis- oder HijackThis.log-Fenster existiert
Do
Exit_Timer(10000) ;falls die Schleife hängt Script nach 10 Sekunden beenden
Until WinClose($HijackThis_Title) = 0 And WinClose($HijackThis_Log_Title) = 0
EndIf

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

BlockInput(1) ;Sperrt Eingaben des Users

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

;HijackThis - Starten
Run($HijackThis_Path)
WinWaitActive($HijackThis_Title)
ControlClick($HijackThis_Title, $HijackThis_Button_Name, $HijackThis_Button_ID)

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

;HijackThis Logfile - Kopieren & Speichern
WinWaitActive($HijackThis_Log_Title)
Send($Alles_markieren)
Send($Kopieren)
Send($Speichern)

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

;HijackThis Logfile & HijackThis - Schliessen
WinClose($HijackThis_Log_Title)
WinClose($HijackThis_Title)

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

;Browser(Firefox) & Firefox-Tab HijackThis Logfileauswertung - Starten
Run($Firefox_Path & " " & $Website_HijackThis_Logfileauswertung_Path)
WinWait($Website_HijackThis_Logfileauswertung_Title)
WinActivate($Firefox_Class)
WinActivate($Website_HijackThis_Logfileauswertung_Title)

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

;HijackThis Logfile bei Firefox-Tab HijackThis Logfileauswertung - Einfügen
Send("{Tab}")
Send($Alles_markieren)
Send("{DEL}")
Send($Einfuegen)

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

;Maus ~Positionieren
MouseMove (625, 790)

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

BlockInput(0) ;Entsperrt Eingaben des Users

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

Sound() ;
Exit
;Ende

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

;Funktionen
Func Exit_Timer($i) ;sind zuletzt $i Millisekunden überschritten worden dann beende das Script
If TimerDiff($Timer) > $i Then
Sound() ;
Exit
EndIf
EndFunc

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

Func Sound()
Beep(200,200)
EndFunc

[/autoit]