[Script]Downloadverlauf Internet Explorer

    Hallo!
    Ich habe mal ein Script gebastelt, da ich nicht weiß wie man einen Downloadverlauf bei dem Internet Explorer aktiviert, dass eine .Ini erstellt wo er dann den Downloadverlauf hineinschreibt.

    In der .Ini sind 2 Sektionen:
    [Download] = Hier wird alles abgespeichert, Sicherheitswarnung, Speichern Dialog und der Titel des Downloades.
    [Download-Title] = Hier wird nur der Titel abgespeichert!

    Soll nur so ein Background Script sein, also ohne GUI. Wer aber will kann es in eine GUI einbinden.

    Hier ist das Script, viel Spass :)

    [autoit]

    ; Download-Manager bei Understood

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

    Global Const $sWinClassDL = "#32770"
    Global $bCheck = False
    Global $hWnd_Win
    Global $sTitleDL
    Global $aIni
    Global $bCheck_Title
    Global $aIni_Title

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

    While 1
    If WinExists("[Class:" & $sWinClassDL & "]") Then
    $hWnd_Win = WinGetHandle("[Class:" & $sWinClassDL & "]")
    $sTitleDL = WinGetTitle("[Class:" & $sWinClassDL & "]")
    If FileExists(@DesktopDir & "\Download-Data.ini") Then
    $aIni = IniReadSection(@DesktopDir & "\Download-Data.ini", "Download")
    If IsArray($aIni) Then
    For $i = 0 To UBound($aIni, 1) -1 Step +1
    If $aIni[$i][0] <> $hWnd_Win And $aIni[$i][1] <> $sTitleDL Then
    $bCheck = True
    Else
    $bCheck = False
    ExitLoop
    EndIf
    Next
    If $bCheck = True Then
    $aIni_Title = IniReadSection(@DesktopDir & "\Download-Data.ini", "Download_Title")
    If IsArray($aIni_Title) Then
    For $i = 0 To UBound($aIni_Title, 1) -1 Step +1
    If $aIni_Title[$i][0] <> $hWnd_Win And $aIni_Title[$i][1] <> $sTitleDL Then
    $bCheck_Title = True
    Else
    $bCheck_Title = False
    ExitLoop
    EndIf
    Next
    If $bCheck_Title = True Then
    If StringInStr($sTitleDL, "%") Then
    IniWrite(@DesktopDir & "\Download-Data.ini", "Download_Title", $hWnd_Win, $sTitleDL)
    EndIf
    EndIf
    IniWrite(@DesktopDir & "\Download-Data.ini", "Download", $hWnd_Win, $sTitleDL)
    Else
    If StringInStr($sTitleDL, "%") Then
    IniWrite(@DesktopDir & "\Download-Data.ini", "Download_Title", $hWnd_Win, $sTitleDL)
    EndIf
    EndIf
    EndIf
    EndIf
    Else
    IniWrite(@DesktopDir & "\Download-Data.ini", "Download", $hWnd_Win, $sTitleDL)
    EndIf
    EndIf
    WEnd

    [/autoit]

    Edit: Habe grade bemerkt, dass er alle Speicherdialoge in die .Ini abspeichert, sowie WinRar Entpack-Fenster.
    Hmm, hoffentlich schadet es keinem :)