1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. Lottich

Beiträge von Lottich

  • Fehler beim Drag&Drop

    • Lottich
    • 10. August 2012 um 03:22

    Jetzt hab ich aber Bockmist gebaut 8|

    Hey all.

    Ich hab mir einen Desktop-Cleaner gebaut, weil ich mir regelmäßig den Desktop zumülle. ich ziehe 1 oder mehrere Dateien in ein Feld und diese werden dann in einen, aus einer Combobox zuvor gewählten, Ordner verschoben.
    Mit den Dateien klappt das alles, deshalb hab ich innerlich gejubelt weil ich was funktionierendes gebaut habe, ohne das ich jemanden dafür um Hilfe gebeten hab....

    Aber dann!!!

    Ich machte mich ans Werk und hab den Desktop aufgeräumt. Dabei waren auch Ordner mit Inhalt darunter.
    Und da ist es passiert. Aus den Ordnern sind Dateien ohne Endung geworden. Teilweise bis zu 4,5 GB groß. WTF!!!

    Jetzt brauch ich doch eure Hilfe.

    1. Wie kann ich die Ordner wiederherstellen?
    2. Werft doch bitte mal einen Blick auf mein Script und sagt mir wie ich den Fehler beheben kann.

    Spoiler anzeigen
    [autoit]

    #NoTrayIcon
    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_Icon=O:\Software.System\___selbsterstellte___\___au3-files___\für den Serverjoiner\ProgrammIcon_1.ico
    #AutoIt3Wrapper_Res_Description=Desktop aufräumen einfach per Drag&Drop
    #AutoIt3Wrapper_Res_Language=1031
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
    #include "WindowsConstants.au3"
    #include "GUIConstantsEx.au3"
    #include "ButtonConstants.au3" ; Brauch ich um Buttons mit Icons zu versehen
    #include "_msgbox.au3" ; eigene Funktion um Variablen auszulesen
    #include <Array.au3>
    If WinExists("superior Desktop Cleaner") Then Exit
    AutoItWinSetTitle("superior Desktop Cleaner")

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

    Global $name = "My Desk-Cleaner", $gaDropFiles[1], $ordner[20], $Ordner_Pfad[20], $button[20], $open_selected_folder, $zielpfad, $iDropItem = -1, $combo, $dropper, $h_GUI, $h_Child

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

    $ordner[1]= "RAR-Files"
    $ordner[2]= "Text-Files"
    $ordner[3]= "Programme"
    $ordner[4]= "Wichtiges"
    $ordner[5]= "Funny Stuff"
    $ordner[6]= "Bilder"
    $ordner[7]= "Audio"
    $ordner[8]= "Scripte"
    $ordner[9]= "Sonstiges"

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

    $Ordner_Pfad[1] = @MyDocumentsDir & "\" & $name & "\" & $ordner[1]
    $Ordner_Pfad[2] = @MyDocumentsDir & "\" & $name & "\" & $ordner[2]
    $Ordner_Pfad[3] = @MyDocumentsDir & "\" & $name & "\" & $ordner[3]
    $Ordner_Pfad[4] = @MyDocumentsDir & "\" & $name & "\" & $ordner[4]
    $Ordner_Pfad[5] = @MyDocumentsDir & "\" & $name & "\" & $ordner[5]
    $Ordner_Pfad[6] = @MyDocumentsDir & "\" & $name & "\" & $ordner[6]
    $Ordner_Pfad[7] = @MyDocumentsDir & "\" & $name & "\" & $ordner[7]
    $Ordner_Pfad[8] = @MyDocumentsDir & "\" & $name & "\" & $ordner[8]
    $Ordner_Pfad[9] = @MyDocumentsDir & "\" & $name & "\" & $ordner[9]

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

    For $x = 1 To 9
    DirGetSize($Ordner_Pfad[$x])
    If @error Then DirCreate($Ordner_Pfad[$x])
    Next

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

    Func open_selected_folder($extended_Mode = 0)
    If $extended_Mode = 1 Then
    If GUICtrlRead($combo,1) = $ordner[1] Then ShellExecute($Ordner_Pfad[1])
    If GUICtrlRead($combo,1) = $ordner[2] Then ShellExecute($Ordner_Pfad[2])
    If GUICtrlRead($combo,1) = $ordner[3] Then ShellExecute($Ordner_Pfad[3])
    If GUICtrlRead($combo,1) = $ordner[4] Then ShellExecute($Ordner_Pfad[4])
    If GUICtrlRead($combo,1) = $ordner[5] Then ShellExecute($Ordner_Pfad[5])
    If GUICtrlRead($combo,1) = $ordner[6] Then ShellExecute($Ordner_Pfad[6])
    If GUICtrlRead($combo,1) = $ordner[7] Then ShellExecute($Ordner_Pfad[7])
    If GUICtrlRead($combo,1) = $ordner[8] Then ShellExecute($Ordner_Pfad[8])
    If GUICtrlRead($combo,1) = $ordner[9] Then ShellExecute($Ordner_Pfad[9])
    Else
    If GUICtrlRead($combo,1) = $ordner[1] Then $zielpfad = $Ordner_Pfad[1]
    If GUICtrlRead($combo,1) = $ordner[2] Then $zielpfad = $Ordner_Pfad[2]
    If GUICtrlRead($combo,1) = $ordner[3] Then $zielpfad = $Ordner_Pfad[3]
    If GUICtrlRead($combo,1) = $ordner[4] Then $zielpfad = $Ordner_Pfad[4]
    If GUICtrlRead($combo,1) = $ordner[5] Then $zielpfad = $Ordner_Pfad[5]
    If GUICtrlRead($combo,1) = $ordner[6] Then $zielpfad = $Ordner_Pfad[6]
    If GUICtrlRead($combo,1) = $ordner[7] Then $zielpfad = $Ordner_Pfad[7]
    If GUICtrlRead($combo,1) = $ordner[8] Then $zielpfad = $Ordner_Pfad[8]
    If GUICtrlRead($combo,1) = $ordner[9] Then $zielpfad = $Ordner_Pfad[9]
    EndIf
    EndFunc

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

    Func WM_DROPFILES_FUNC($hWnd, $msgID, $wParam, $lParam) ; Diese Funktion ist leider geklaut O.o
    Local $nSize, $pFileName
    Local $nAmt = DllCall('shell32.dll', 'int', 'DragQueryFileW', 'hwnd', $wParam, 'int', 0xFFFFFFFF, 'ptr', 0, 'int', 255)
    For $i = 0 To $nAmt[0] - 1
    $nSize = DllCall('shell32.dll', 'int', 'DragQueryFileW', 'hwnd', $wParam, 'int', $i, 'ptr', 0, 'int', 0)
    $nSize = $nSize[0] + 1
    $pFileName = DllStructCreate('wchar[' & $nSize & ']')
    DllCall('shell32.dll', 'int', 'DragQueryFileW', 'hwnd', $wParam, 'int', $i, 'ptr', DllStructGetPtr($pFileName), 'int', $nSize)
    ReDim $gaDropFiles[$i + 1]
    $gaDropFiles[$i] = DllStructGetData($pFileName, 1)
    $pFileName = 0
    Next
    EndFunc

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

    Func drag_n_drop($kopiere_das_Zeug)
    open_selected_folder()
    $count = StringSplit($kopiere_das_Zeug,"|")
    For $y = 1 To $count[0]
    $name_file = StringMid($count[$y],StringInStr($count[$y], '\', 1, -1)+1)
    FileMove($count[$y], $zielpfad & "\" & $name_file)
    Next
    GUICtrlSetData($dropper,"")
    EndFunc

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

    Func GUI_1()
    Global $h_GUI = GUICreate($name, 150, 150, 0, 0, $WS_Popupwindow, BitOR($WS_EX_ACCEPTFILES, $WS_EX_OVERLAPPEDWINDOW, $WS_EX_TOOLWINDOW, $WS_EX_TOPMOST))
    GUISetBkColor(0x000000)
    Global $combo = GUICtrlCreateCombo("",2,2,80,20)
    Global $dropper = GUICtrlCreateInput("",5,30,140,115)
    $button[1] = GUICtrlCreateButton("",85,0,30,30,$BS_ICON)
    $button[2] = GUICtrlCreateButton("",118,1,26,26,$BS_ICON)
    GUICtrlSetImage($button[1], "imageres.dll", -177)
    GUICtrlSetImage($button[2], "imageres.dll", -217)
    GUICtrlSetState($dropper, $GUI_DROPACCEPTED)
    GUICtrlSetData ($combo, $ordner[1] &"|"& $ordner[2] &"|"& $ordner[3] &"|"& $ordner[4] &"|"& $ordner[5] &"|"& $ordner[6] &"|"& $ordner[7] &"|"& $ordner[8] &"|"& $ordner[9], $ordner[9])
    GUIRegisterMsg($WM_DROPFILES, 'WM_DROPFILES_FUNC')
    GUISetState(@SW_SHOW,$h_GUI)
    While 1
    $msg = GUIGetMsg()
    If $msg = $GUI_EVENT_DROPPED Then drag_n_drop(GUICtrlRead($dropper))
    If $msg = $button[1] Then open_selected_folder(1)
    If $msg = $button[2] Then
    GUISetState(@SW_HIDE,$h_GUI)
    GUI_2()
    ExitLoop
    EndIf
    WEnd
    EndFunc

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

    Func GUI_2($size = 33)
    GUISetState(@SW_HIDE,$h_GUI)
    Global $h_Child = GUICreate("", $size, $size, 0, 0, $WS_Popupwindow, BitOR($WS_EX_TOOLWINDOW, $WS_EX_TOPMOST))
    $button[3] = GUICtrlCreateButton("",0,0,$size,$size,$BS_ICON)
    GUICtrlSetImage($button[3], "comres.dll",-5)
    GUISetState(@SW_SHOW,$h_Child)
    While 1
    $msg = GUIGetMsg()
    If $msg = $button[3] Then
    GUISetState(@SW_HIDE,$h_Child)
    GUI_1()
    ExitLoop
    EndIf
    WEnd
    EndFunc
    GUI_2()

    [/autoit]


    Ich bedanke mich jetzt schonmal im Voraus, denn ich bin mir sicher, dass ich von euch Hilfe bekomme.
    MfG, der "Rettich" :D

  • SB Zitate #4

    • Lottich
    • 6. August 2012 um 01:32
    das is der beste xD
    Zitat

    Lupar: moin moin...ist eigetlich Facebook Poster legal?
    i2c: Wenn's an deiner Wand hängt ... ja
    Lupar: okay danekschön
    Lupar: hab mal gehört das es dafür einen plugin gibt..
    i2c: hrrhrr ... ich liebe es, wenn man mich nicht versteht
    Raupi: ^^
    Lupar: ich hab verstanden wenn du mich meinst^^
    Lupar: aber wie heißt das Plugin :P
    i2c: Tesa
    i2c: ist aber mehr ein Plugon
    Lupar: Tesa Plugon???
    Raupi: Das Plugon Powerstrip ist besser
    i2c: aber bedeutend teurer
    James1337: :rofl:
    Lupar: was??
    i2c: irgendwie bezweifle ich, das Lupar mich wirklich verstanden hat ^^
    An i2c: Man sind wir fies.
    Lupar: das ist eine steckdose..
    Lupar: ich meine den plugin für facebook...und keine steckdose
    Stoani: also ich versteh nur Bahnhof bzw. Steckdose xD
    i2c: wie kommst du jetzt auf Steckdose?
    Lupar: hab ich gegooglet wollte mehr info drüber
    i2c: du willst uns verscheissern, oder? Klappt aber nicht :P
    James1337: :rofl:
    Lupar: häää....ich habt doch über "Tesa Plugon" & dann" Plugon Powerstrip " geschrieben, oder nicht?..die beiden habe ich gegooglet und kam Steckdose raus :S
    Lupar: ihr
    Raupi: :rofl: :rock: :rofl:
    i2c: dafür gibt's hier keinen angemessenen Smilie :D
    i2c: nur eins noch -> ymmd
    Raupi:
    i2c: :thumbup:
    Raupi: :D
    Lupar: habe ich was falsch gemacht?
    James1337: nein, nur den witz nicht verstanden
    Raupi: Ich finde es einfach Weltklasse wenn man bei Google nach Tesa und Powerstrip sucht und Steckdose findet.
    Raupi: Ich glaub das landet bestimmt in Sprengers gesammelten Werken. :rofl:
    James1337: zur not solltest du das aber trotzdem kopieren, nur für den fall, dass das archiv vorher gelöscht wird
    Raupi: Keine Angst, das geht net verschütt.

    Alles anzeigen
  • Prozess schützen

    • Lottich
    • 4. August 2012 um 06:59
    Zitat von chesstiger

    Wieso willst du da eine Batch zwischenschalten?

    [autoit]


    OnAutoItExitRegister("_Exit")

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

    While 1
    Sleep(50)
    WEnd

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

    Func _Exit()
    Run(@ScriptName)
    EndFunc

    [/autoit]

    Müsste ja eigentlich "unkillbar" sein. :P

    lg chess

    Alles anzeigen


    lool, so gehts natürlich auch xD

  • Prozess schützen

    • Lottich
    • 4. August 2012 um 05:18

    ähm... ich bin zwar nur ein Amateur in AutoIt, aber könnte man nicht mit der Hilfe von

    [autoit]

    OnAutoItExitRegister("")

    [/autoit]

    eine Funktion schreiben, ähnlich wie _Selfdelete()?

    Damit dann eine Batch starten, die das Programm erneut ausführt.
    Wäre doch machbar. Das verhindert zwar nicht, dass der Prozess beendet wird, dafür wird der aber gleich wieder gestartet.

    MfG Lottich

  • GuiCtrlSetImage fehler

    • Lottich
    • 26. Juli 2012 um 17:17

    Danke für den Tip autoBert. Es hat so funktioniert:

    Das erste erstellte Image gilt für das gesamte TreeViewTab, danach hab ich separat für jeden anderen Eintrag ein anderes Image festgelegt. Da hätte ich selber drauf kommen müssen. ;( *schäm*
    Was jedoch noch nicht funktioniert: Es sollen einige Einträge kein Icon/image erhalten. Wenn ich nun aber einen neuen Eintrag anlege, bekommt der automatisch das erste Image verpasst.
    Wenn ich dann

    [autoit]

    GUICtrlSetImage(-1, "shell32.dll", 6000) ; <--- oder eine andere Zahl, die kein Icon/Image enthält

    [/autoit]

    als erstes Image für den gesamten TVT benutze, dann wird automatisch das nächst erstellte Icon/image als standard verwendet :(

    Gibt es irgendwo ein BlankoImage in der genannten DLL oder muss ich mir selber nen Blanko anlegen?

    Edit: hab mir ein blanko.ico erstellt, funktioniert wie gedacht xD

  • GuiCtrlSetImage fehler

    • Lottich
    • 25. Juli 2012 um 20:24

    Hey all,

    ich benutze zusätzlich das include TreeViewTab.au3
    im nachfolgenden Script hab ich in der Zeile 20 bestimmt, dass ein Icon einem TreeViewTabItem zugeordnet werden soll. Aber es werden ALLE TVTItems damit beflackt.
    Ich weiss nicht weshalb, kann mir wer helfen?

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <GUIButton.au3>
    #include "TreeViewTab.au3"

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

    Global $name_der_gui = "Test Interface"
    Global $logo_0 = "pfad 1" ; ist hier jetzt nicht wichtig
    Global $logo_1 = "pfad 2" ; ist hier jetzt nicht wichtig
    Global $logo_2 = "pfad 3" ; ist hier jetzt nicht wichtig

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

    Global $h_MainGUI = GUICreate($name_der_gui,800,600)
    GUISetFont(10)
    Global $iTreeViewTab = _GUICtrlTreeViewTab_CreateTab(10, 10, 200, 350, -1, BitOR($WS_EX_STATICEDGE, $WS_EX_CLIENTEDGE))

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

    #region Teamspeak
    $iTreeViewTabItem__TS_3 = _GUICtrlTreeViewTab_CreateTabItem ("Teamspeak 3", $iTreeViewTab)
    GUICtrlSetImage(-1, "shell32.dll", 44); <-------------------------------------------------------------------- hier haut es einfach nicht hin...
    $iHeader_Icon = GUICtrlCreateIcon($logo_0, -1, 220, 10, 32, 32) ; egal wie ich es versuche, es wird das Icon für alle TabItems gesetzt...
    $iHeader_Label = GUICtrlCreateLabel("Teamspeak 3", 260, 10, 300, 40) ; Warum????
    GUICtrlSetColor(-1, 0xFF0000)
    GUICtrlSetFont (-1, 20, 800, 0, "Georgia")
    _GUICtrlTreeViewTab_CreateTabItem("",$iTreeViewTab) ; Trenner
    #endregion

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

    #region CoD 4
    $iTreeViewTabItem_CoD_4 = _GUICtrlTreeViewTab_CreateTabItem ("Modern Warfare", $iTreeViewTab)
    $iHeader_Icon = GUICtrlCreateIcon($logo_1, -1, 220, 10, 32, 32)
    $iHeader_Label = GUICtrlCreateLabel("Modern Warfare 1", 260, 10, 300, 40)
    GUICtrlSetColor(-1, 0xFF0000)
    GUICtrlSetFont(-1, 20, 800, 0, "Georgia")

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

    #region CoD 4 Server 1
    $iTreeViewTabItem_CoD_4_Server1 = _GUICtrlTreeViewTab_CreateTabItem ("Hardcore", $iTreeViewTab, $iTreeViewTabItem_CoD_4)
    $iHeader_Icon = GUICtrlCreateIcon($logo_1, -1, 220, 10, 32, 32)
    $iHeader_Label = GUICtrlCreateLabel("Modern Warfare 1", 260, 10, 530, 40)
    GUICtrlSetColor(-1, 0xFF0000)
    GUICtrlSetFont (-1, 20, 800, 0, "Georgia")
    $iHeader_Label = GUICtrlCreateLabel("Hardcore", 540, 10, 260, 40)
    GUICtrlSetColor(-1, 0x0B610B)
    GUICtrlSetFont (-1, 20, 800, 0, "Georgia")
    #endregion

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

    #region CoD 4 Server 2
    $iTreeViewTabItem_CoD_4_Server2 = _GUICtrlTreeViewTab_CreateTabItem ("Warserver", $iTreeViewTab, $iTreeViewTabItem_CoD_4)
    $iHeader_Icon = GUICtrlCreateIcon($logo_1, -1, 220, 10, 32, 32)
    $iHeader_Label = GUICtrlCreateLabel("Modern Warfare 1", 260, 10, 530, 40)
    GUICtrlSetColor(-1, 0xFF0000)
    GUICtrlSetFont (-1, 20, 800, 0, "Georgia")
    $iHeader_Label = GUICtrlCreateLabel("Warserver", 540, 10, 260, 40)
    GUICtrlSetColor(-1, 0x0B610B)
    GUICtrlSetFont (-1, 20, 800, 0, "Georgia")
    #endregion

    _GUICtrlTreeViewTab_CreateTabItem("",$iTreeViewTab) ; Trenner
    #endregion

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

    #region CoD 6
    $iTreeViewTabItem_CoD_6 = _GUICtrlTreeViewTab_CreateTabItem ("Modern Warfare 2", $iTreeViewTab)
    $iHeader_Icon = GUICtrlCreateIcon($logo_2, -1, 220, 10, 32, 32)
    $iHeader_Label = GUICtrlCreateLabel("Modern Warfare 2", 260, 10, 300, 40)
    GUICtrlSetColor(-1, 0xFF0000)
    GUICtrlSetFont (-1, 20, 800, 0, "Georgia")

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

    #region CoD 6 Server 1
    $iTreeViewTabItem_CoD_6_Server1 = _GUICtrlTreeViewTab_CreateTabItem ("Hardcore", $iTreeViewTab, $iTreeViewTabItem_CoD_6)
    $iHeader_Icon = GUICtrlCreateIcon($logo_2, -1, 220, 10, 32, 32)
    $iHeader_Label = GUICtrlCreateLabel("Modern Warfare 2", 260, 10, 530, 40)
    GUICtrlSetColor(-1, 0xFF0000)
    GUICtrlSetFont (-1, 20, 800, 0, "Georgia")
    $iHeader_Label = GUICtrlCreateLabel("Hardcore", 540, 10, 260, 40)
    GUICtrlSetColor(-1, 0x0B610B)
    GUICtrlSetFont (-1, 20, 800, 0, "Georgia")
    #endregion

    #region CoD 6 Server 2
    $iTreeViewTabItem_CoD_6_Server2 = _GUICtrlTreeViewTab_CreateTabItem ("Gun & Fun", $iTreeViewTab, $iTreeViewTabItem_CoD_6)
    $iHeader_Icon = GUICtrlCreateIcon($logo_2, -1, 220, 10, 32, 32)
    $iHeader_Label = GUICtrlCreateLabel("Modern Warfare 2", 260, 10, 530, 40)
    GUICtrlSetColor(-1, 0xFF0000)
    GUICtrlSetFont (-1, 20, 800, 0, "Georgia")
    $iHeader_Label = GUICtrlCreateLabel("Gun 4 Fun", 540, 10, 260, 40)
    GUICtrlSetColor(-1, 0x0B610B)
    GUICtrlSetFont (-1, 20, 800, 0, "Georgia")
    #endregion

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

    #region CoD 6 Server 3
    $iTreeViewTabItem_CoD_6_Server3 = _GUICtrlTreeViewTab_CreateTabItem ("Zombies", $iTreeViewTab, $iTreeViewTabItem_CoD_6)
    $iHeader_Icon = GUICtrlCreateIcon($logo_2, -1, 220, 10, 32, 32)
    $iHeader_Label = GUICtrlCreateLabel("Modern Warfare 2", 260, 10, 260, 40)
    GUICtrlSetColor(-1, 0xFF0000)
    GUICtrlSetFont (-1, 20, 800, 0, "Georgia")
    $iHeader_Label = GUICtrlCreateLabel("Zombies", 540, 10, 260, 40)
    GUICtrlSetColor(-1, 0x0B610B)
    GUICtrlSetFont (-1, 20, 800, 0, "Georgia")
    #endregion

    _GUICtrlTreeViewTab_CreateTabItem("",$iTreeViewTab)
    #endregion

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

    _GUICtrlTreeViewTab_CloseTab($iTreeViewTab)
    GUICtrlCreateLabel("", 220, 50, 560, 2, $SS_SUNKEN)
    GUICtrlCreateLabel("", 10, 370, 770, 2, $SS_SUNKEN)
    GUICtrlCreateGroup("", 220, 55, 560, 305)

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

    GUICtrlSetState($iTreeViewTabItem_CoD_6, BitOR($GUI_EXPAND, $GUI_DEFBUTTON))
    GUICtrlSetState($iTreeViewTabItem_CoD_4, BitOR($GUI_EXPAND, $GUI_DEFBUTTON))
    GUICtrlSetState($iTreeViewTabItem__TS_3, BitOR($GUI_EXPAND, $GUI_DEFBUTTON))

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

    GUISetState(@SW_SHOW, $h_MainGUI)
    While 1
    Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
    ExitLoop
    EndSwitch
    WEnd

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

    _GUICtrlTreeViewTab_DestroyTab($iTreeViewTab)

    [/autoit]

    Ziel ist es, einigen items andere Icons zuzuweisen und einigen überhaupt keine...

    mfG Lottich

  • was für eine besch...eidene Woche!!!!

    • Lottich
    • 21. Juli 2012 um 00:54

    der erste Schritt für ne gute nächste Woche ist getan, das Bike ist endlich repariert :D
    Dann mal abwarten xD

  • was für eine besch...eidene Woche!!!!

    • Lottich
    • 20. Juli 2012 um 11:46
    Zitat von Cheater Dieter

    Aber wie kommst du auch darauf, einen Fahrradreifen mit einem Kompressor aufzupumpen? Es gibt übrigens sogar Luftpumpen mit Baranzeige. Also wenn du deinen Refen ausreizen willst, dann leg' dir sowas zu, aber lass' die Finger weg vom Kompressor


    Hey CheaterDieter

    hab am kompressor natürlich eine Druckanzeige dran xD.


    BugFix und Sprenger: Danke für eure Tips! :)

    Jetzt mach ich mich wieder auf zum Wandern.

  • was für eine besch...eidene Woche!!!!

    • Lottich
    • 20. Juli 2012 um 01:37

    Hi, hoffe euch geht es diese Woche nicht wie mir...
    Ich fahre jeden Tag mit nem Fahrrad auf Arbeit (nur ca 6 Km, kein Ding). Samstag abend stellte ich fest: Verdammt, Platten aufm Hinterrad!! So ein Mist.

    Da ich diese Woche Mittagschicht habe und aus ""schlafrythmustechnischen" Gründen kam ich ,natürlich, 3 Minuten zu spät beim Fahrradhändler an (12:33), der machte Mittagspause und ich konnte nicht warten, sonst käm ich zu spät zur Arbeit.
    Also auf auf zur Knechterei... zu Fuss... ( 14 km Fussmarsch hin und zurück inkl Abstecher zum Bike-Heini )

    Dann am Dienstag war ich rechtzeitig da und holte mir nen 26" Schlauch und wanderte wieder zur Arbeit, knechtete und dann wieder nach hause... Kollegen nehmen mich nicht mit, weil ALLE in die entgegen gesetzte Richtung müssen...
    Erneut 14 Km Fussmarsch, ich war total bedient. Bei mir angekommen wollte ich das Hinterrad ausbauen und musste mich daran erinnern, dass mir vor einigen Jahren fast mein gesammtes Werkzeug ausm Keller geklaut wurde und ich mir damals neues holen wollte... wie gesagt: wollte... Das hat mich dan schmerzlich daran erinnert, dass ich es vergessen hatte. Dann hab ich in irgend einer Schublade ne Wasserrohrzange gefunden und in einer anderen sowas ähnliches, nicht mit so nem eckigen Kopf wie es für Zangen üblich ist, sondern mit 2 runden Zähnen ( damit kann man Rohre perfekt greifen; eigentlich sollte dass die wahre Rohrzange sein... ).

    Dann machte ich mich mit meinem bisschen Werkzeuch ans Werk und baute das Hinterrad aus. Nächstes Problem: mein Bike hat nen Rücktritt, festgemacht mit ner 8er Schraube und ner selbstsichernden Mutter, hab ich da gekotzt. hab mich ewig mit den 2 Zangen rumgequält, bis ich das scheiss Teil endlich ab hatte. Hab mich natürlich auch fluchend richtig reingesteigert, was mir sogar Schweiss auf die Stirn trieb. Dann erstmal eine geraucht um wieder runter zu kommen...

    Mantel ab, Schlauch ab, neuen Schlauch ausgepackt, Ventilbuchse durch die Felge gedrückt, Ventil rein und leicht aufgepumpt.... dann mein Entsetzen: das ist ja ein schei.. 28er!!! Schlauch zu klein!! Wieder reingesteigert ins Fluchen und wurde wütend auf mich selber weil ich zu dämlich war nach zu gucken was ich tatsächlich brauche. Also hab ich den Schlauch so weit aufgepumpt dass der um die Felge passte, und habs dann eingebaut. Dachte: naja, 2 - 3 Tage wirds schon halten...

    Am Mittwoch dann, Luft war immer noch da, schwang ich mich aufs Bike und ab zur Arbeit. Unterwegs kurz halt gemacht beim Bäcker. War vielleicht 3 Minuten drin. und als ich wieder raus kam... Platten!!!! Zur arbeit geschoben und kam zu spät.
    Gab aber kein Ärger, war höhere Gewalt meinte mein Chef. Feierabend, zurück nach hause, Fussmarsch, inkl schieben, ca 8 Km...

    Donnerstag ( für mich noch Heute ) wieder ab zum Bikeshop, nen 28er Schlauch gekauft mit Pannenschutz ( gabs nur mit Autoventil also musste auch ne neue Luftpumpe her... ) und weiter zur Arbeit gewandert. Nach Feierabend dann das Fahrrad zur Werkstatt gebracht und dort mit vernünftigem Werkzeug den Schlauch gewechselt, ganz ohne Frust und mit nem grinsen im gesicht weils so viel schneller ging als bei mir zu hause. Da kam ein kollege aus der nachtschicht zu mir und meinte ich soll auch genügend Luft drauf machen, soll gucken was auf dem Mantel steht... Da hab ich nie drauf geachtet beim Fahrrad, hab immer nur soviel drauf gemacht, wie es sich bequem fahren lässt ohne das man gleich jeden Huckel auf der Strasse merkt... Und tatsächlich stand auf dem Mantel: 3,4 bis 5,1 bar. Also hab ich den Kompressor angeschmissen und 4 draufgehauen.... dann hab ich noch etwas länger mit dem Kollegen gequatscht, das Hinterrad auf der Werkbank gegen die Wand gelehnt, ich lehnte gegen die Werkbank mit dem Rad im Rücken, im erzählen vertieft...

    RRRRRRUUUUUUUUUUUUUMMMMMMMMMMMMSSSSSSSSSSSSS !!!!!!!!!!!!!!!!!!!!

    Da gabs nen Knall, dass mir die Ohren geklingelt haben.

    Schlauch geplatzt, Mantel im Arsch und 2 Speichen gebrochen!!!
    Nachdem ich mich von dem knall-Schock erholt hatte bekam ich nen Lachanfall. Anschliessend gingen er und ich zu Analyse über, wobei wir feststellten, dass ich offenbar den Schlauch an einer Stelle zwischen Mantel und Felge eingeklemmt hatte, denn genau da wo der Riss im Schlauch war hat es den Mantel vom Draht abgefetzt und die beiden Speichen, die es zerlegt hat, sind an derem Winkel an der Nabe weggebrochen....

    Wieder nach hause gelaufen mit Umweg zu Tanke, Kippen holen, Fussmarsch ca 9 km...

    Und Freitag (also tatsächlich heute) werde ich wieder zum Bikeheini wandern, mir wieder nen 28er Pannenschutzschlauch kaufen und zusätzlich noch nen neuen Mantel. Auf die Speichen werd ich erst mal scheissen und wenn das wieder nix wird
    werd ich mir vllt nen Auto zulegen...

    Also werde ich wieder mindestens 8 Km laufen... insgesammt ca 61 Km ..... vllt hab ich mich jetzt auch verzählt, mir egal jetzt, es reicht aber auf jeden Fall aus um die Schnautze gestrichen voll zu haben...

    Wie bereits oben erwähnt, ich hoffe eure Woche verlief besser...
    Cya

    Lottich

  • _GUICtrlButton_CreateSoft -- Soft-Buttons nun in AutoIt ganz einfach erstellen

    • Lottich
    • 14. Juli 2012 um 07:55

    Hallo Blume,

    diese Art Buttons gibt es meiner Meinung nach bereits.

    [autoit]

    _GUICtrlButton_Create()

    [/autoit]

    In der Hilfe findest du parameter, die diese Buttons genau so anzeigen wie in deinem Beispiel.

    autoBert:
    Auch in diesem Fall funktioniert das nicht unter XP, da es diesen Stil scheinbar erst seit Vista gibt. (steht auch in der Hilfe :D )

  • Brainfuck - Anfängerhilfe

    • Lottich
    • 13. Juli 2012 um 19:27
    Zitat von Nathax

    Sicher das du das lernen möchtest?!

    Wikipedia:

    Hello World!

    Das folgende Programm gibt „Hello World!“ und einen Zeilenumbruch aus.

    Code
    ++++++++++
     [
      >+++++++>++++++++++>+++>+<<<<-
     ]                     
     >++.                
     >+.                     
     +++++++.           '
     .                       
     +++.                   
     >++.                    
     <<+++++++++++++++.      
     >.                      
     +++.                    
     ------.                 
     --------.               
     >+.                     
     >.                      
     +++.
    Alles anzeigen


    Ich finde das sowas von schwachsinnig! Bau dir damit mal ein etwas komplexeres Script... dann stellst du fest, dass da ein kleiner Fehler drin ist.... und dann geh mal auf Fehlersuche!!! Totaler Schwachsinn.

  • [STEAM] Source UDF

    • Lottich
    • 11. Juli 2012 um 17:47

    Hallo K4z

    Das find ich gar nicht mal so übel, allerdings bin ich nicht grad ein Freund von CS-Games.
    Ich werd mal bei Gelegenheit versuchen, deine UDF zu erweitern (oder für meine eigenen Zwecke umzuändern ;) ), sodass es zumiondest auch für MW2 funktioniert.

    MfG Lottich

  • Programmverknüpfung im Ordner Öffentlich->Desktop unter Windows 7

    • Lottich
    • 11. Juli 2012 um 14:30

    Kann es sein, dass du dafür #RequireAdmin brauchst? Weil du ja in dem Fall für alle User etwas hinzufügst. kann mir gut vorstellen, dass es eine art Sicherheitseinrichtung ist

  • Autorun

    • Lottich
    • 3. Juli 2012 um 20:41

    wie wäre es mit ?( google ??

    weil, das ist von OS zu OS verschieden und meine Glaskugel ist grad in der Wartung 8):P

  • Burning Keyboard - Wie schnell kannst du tippen?

    • Lottich
    • 24. Juni 2012 um 18:40

    echt cooles Programm, allerdings muss ich schockiert feststellen, dass hier scheinbar nur Freakz unterwegs sind :P;)
    Wie seid ihr so schnell beim tippen? hab jetzt 8 Versuche hinter mir und die Ergebnisse sehen fast immer wie dieses aus:
    [Blockierte Grafik: http://www.ifa-clan.de/files/Forumbilder/speedtest01.PNG] ja!!! verbessert xD [Blockierte Grafik: http://www.ifa-clan.de/files/Forumbilder/speedtest02.PNG]

  • Offlinelogger --Probleme mit timer / while-Schleife

    • Lottich
    • 24. Juni 2012 um 15:07

    Memo an mich selbst:
    Wenn man müde ist sollte man sich nicht durch irgendwelche Schleifen/If-Else-Klauseln arbeiten, sondern ins Nest gehen...

    Habe den Fehler gefunden und den Code umgeschrieben. 3 mal getestet und im Logfile auch genau die Einträge bekommen die es auch sein sollten.
    Für alle, die es interessieren könnte ist hier der fertige Code.

    Offlinelogger v1.01
    [autoit]

    #include <Date.au3>
    #include <file.au3>

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

    Global $ping_1 = "www.google.de"
    Global $ping_2 = "www.ifa-clan.de"
    Global $ping_3 = "www.autoit.de"
    Global $ping_4 = "www.web.de"
    Global $ping_5 = "www.gmx.de"
    Global $basis = @ScriptDir & "\Offlinelogs\"
    Global $pfad = @ScriptDir & "\Offlinelogs\" & _NowDate() & ".log"
    Global $pfad2 = @ScriptDir & "\Offlinelogs\_Auswertung.log"
    Global $Hour, $Mins, $Secs, $liste, $ist, $ist1, $ist2

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

    Func starte_protokoll()
    If Not Ping($ping_1,500) Then ; Wenn das anpingen dieser Webseiten nicht werfolgreich ist,
    If Not Ping($ping_2,500) Then ; wird der Timer initialisiert, denn es ist höchst wahrscheinlich,
    If Not Ping($ping_3,500) Then ; dass die Internetverbindung aus irgend einem Grund nicht vorhanden ist.
    If Not Ping($ping_4,500) Then
    If Not Ping($ping_5,500) Then
    $pfad = @UserProfileDir & "\Offlinelogs\" & _NowDate() & ".log"
    $timer = TimerInit()
    $startzeit = _NowTime(5) ; Zeitpunkt der Initialisierung des Timers für den korrekten Logeintrag speichern.
    If Not FileExists($pfad) Then
    $neu = FileOpen($pfad,1) ; Hier wird das Grundgerüst des Logfiles erstellt, falls nicht vorhanden.
    FileWrite($neu,"[registrierte Ausfälle]" &@CRLF& "Anzahl" &@TAB&@TAB&@TAB& "=" & @TAB & "0" &@CRLF& "Zeit Total" &@TAB&@TAB& "=" &@TAB& "0" &@CRLF&@CRLF& _
    "[gesammelte Ticks]" &@CRLF& "Anzahl" &@TAB&@TAB&@TAB& "=" &@TAB& "0" &@CRLF&@CRLF& "[detailierte Liste]")
    FileClose($neu)
    EndIf
    If Not FileExists($pfad2) Then
    $neu = FileOpen($pfad2,1) ; Hier wird das Grundgerüst der Zusammenfassung aller betroffenen Tage erstellt, falls nicht vorhanden.
    FileWrite($neu,"[Zusammenfassung]" &@CRLF& "Anzahl betroffener Tage" &@TAB& "=" &@TAB& "0" &@CRLF& "Anzahl der Ausfälle" &@TAB&@TAB& "=" &@TAB& "0" & _
    @CRLF& "Zeit Total" &@TAB&@TAB&@TAB&@TAB& "=" &@TAB& "0" &@CRLF&@CRLF&"gesammelte Ticks" &@TAB&@TAB& "=" &@TAB& "0")
    FileClose($neu)
    EndIf
    Do ; Die schleife, die so lange abgearbeitet wird, bis eine der Webseiten wieder erreichbar ist,
    Sleep(250) ; was eine vorhandene Internetverbindung bestätigt.
    Until Ping($ping_1,500) Or Ping($ping_2,500) Or Ping($ping_3,500) Or Ping($ping_4,500) Or Ping($ping_5,500)

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

    $ticks = TimerDiff($timer) ; Beendet den Timer und liest die angesammelten Ticks für die Weiterverwendung aus.
    $ist = IniRead($pfad,"gesammelte Ticks","Anzahl","0") ; Liest die bisher gesammelten Ticks des aktuellen Tages aus und addiert diese
    IniWrite($pfad,"gesammelte Ticks","Anzahl",@TAB & $ticks + $ist) ; mit den neu gesammelten Ticks. Dient der Auflistung der gesammten Ausfallzeit.

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

    _TicksToTime($ticks, $Hour, $Mins, $Secs) ; Konvertiert die aktuellen Ticks in ein vernünftiges Zeitformat und schreibt den Log-Eintrag in den aktuellen Tages-Log.
    $dauer = (@TAB & $Hour & " Stunden, " & $Mins & " Minuten und " & $Secs & " Sekunden keine Verbindung zum Internet" & @TAB & "|- Ticks =" & @TAB & $ticks)
    IniWrite($pfad,"detailierte Liste","ab " & $startzeit & @TAB & @TAB, $dauer)

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

    $ist = IniReadSection($pfad,"detailierte Liste") ; Aktualisiert die Anzahl der
    IniWrite($pfad,"registrierte Ausfälle","Anzahl",@TAB & ($ist[0][0])) ; Ausfälle des aktuellen Tages.

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

    $ist = IniRead($pfad,"gesammelte Ticks","Anzahl","0") ; Liest die gesammten Ticks des aktuellen Tages aus und konvertiert diese zur Niederschrift
    _TicksToTime($ist, $Hour, $Mins, $Secs) ; in ein vernünftiges Zeitformat um die gesammte Ausfallzeit des aktuellen Tages zu bekommen.
    $dauer = (@TAB & $Hour & " Stunden, " & $Mins & " Minuten und " & $Secs & " Sekunden")
    IniWrite($pfad,"registrierte Ausfälle","Zeit Total", $dauer)

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

    $liste = _FileListToArray($basis,"*.*.*.log",1)
    Local $result1 = 0, $result2 = 0
    For $i = 1 to $liste[0]
    $ist1 = IniRead($basis & $liste[$i],"gesammelte Ticks","Anzahl","0") ; Liest alle Ticks der geloggten Tage aus.
    $ist2 = IniRead($basis & $liste[$i],"registrierte Ausfälle","Anzahl","0") ; Liest alle Ausfälle der geloggten Tage aus.
    $result1 = $result1 + $ist1
    $result2 = $result2 + $ist2
    Next
    IniWrite($pfad2,"Zusammenfassung","Anzahl betroffener Tage",@TAB & $liste[0]) ; Aktualisiert die Anzahl pro geloggtem Tag.
    IniWrite($pfad2,"Zusammenfassung","gesammelte Ticks",@TAB & $result1) ; Aktualisiert die Anzahl der Ticks pro geloggtem Tag.
    IniWrite($pfad2,"Zusammenfassung","Anzahl der Ausfälle",@TAB & $result2) ; Aktualisiert die Anzahl der Ausfälle pro geloggtem Tag.

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

    $ist = IniRead($pfad2,"Zusammenfassung","gesammelte Ticks","0") ; Konvertiert die Ticks aller geloggten Ausfälle in ein
    _TicksToTime($ist, $Hour, $Mins, $Secs) ; lesbares Zeitformat zur Niederschrift in der Zusammenfassung.
    $dauer = (@TAB & $Hour & " Stunden, " & $Mins & " Minuten und " & $Secs & " Sekunden")
    IniWrite($pfad2,"Zusammenfassung","Zeit Total", $dauer)
    EndIf
    EndIf
    EndIf
    EndIf
    EndIf
    EndFunc

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

    While 1
    starte_protokoll()
    Sleep(2000)
    WEnd

    [/autoit]


    misterspeed:
    Danke für deinen Post. Das ist sicher eine gute Alternative, jedoch werd ich bei meinem Script bleiben.
    Du kannst sicher nachvollziehen, dass wenn man nach ner gefühlten Ewigkeit sein Script endlich so hinbekommen hat, dass es funktioniert wie es soll, man es ungern gegen etwas anderes eintauschen möchte. :)

  • Offlinelogger --Probleme mit timer / while-Schleife

    • Lottich
    • 24. Juni 2012 um 03:37

    Hallo, der DAU mal wieder.

    Leider musste ich diesen Thread wieder öffnen.

    Ich habe das Script soweit fertig, jedoch gibt es nun einen erneuten Fehler.
    Während des Testens, unter Anpingens einer Adresse, funktionierte es einwandfrei.
    Nachdem ich mein Script jedoch um 4 weitere Adressen zum Anpingen erweitert habe, wird das Logfile falsch ausgegeben.

    Offlinelogger
    [autoit]

    #include <Date.au3>

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

    Global $file = _NowDate() & ".log"
    Global $pfad = @UserProfileDir & "\Offlinelogs\"
    Global $pfad_total = $pfad & $file
    Global $check, $Hour, $Mins, $Secs
    Global $ping_1 = "www.google.de"
    Global $ping_2 = "www.ifa-clan.de"
    Global $ping_3 = "www.autoit.de"
    Global $ping_4 = "www.web.de"
    Global $ping_5 = "www.gmx.de"

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

    Func onlinecheck()
    While 1
    If Not Ping($ping_1,500) Then
    $check = "error"
    If Not Ping($ping_2,500) Then
    If Not Ping($ping_3,500) Then
    If Not Ping($ping_4,500) Then
    If Not Ping($ping_5,500) Then
    starte_protokoll()
    Else
    $check = "okay"
    ExitLoop
    EndIf
    Else
    $check = "okay"
    ExitLoop
    EndIf
    Else
    $check = "okay"
    ExitLoop
    EndIf
    Else
    $check = "okay"
    ExitLoop
    EndIf
    Else
    $check = "okay"
    ExitLoop
    EndIf
    WEnd
    EndFunc

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

    Func starte_protokoll()
    $timer = TimerInit()
    $startzeit = _NowTime(5)
    If Not FileExists($pfad_total) Then
    $neu = FileOpen($pfad_total,1)
    FileWrite($neu,"[registrierte Ausfälle]" &@CRLF& "Anzahl" &@TAB&@TAB&@TAB& "=" & @TAB & "0" &@CRLF& "Zeit Total" &@TAB&@TAB& "=" &@CRLF&@CRLF)
    FileWrite($neu,"[gesammelte Ticks]" &@CRLF& "Anzahl" &@TAB&@TAB&@TAB& "=" & @TAB & "0" &@CRLF&@CRLF)
    FileWrite($neu,"[detailierte Liste]" &@CRLF)
    FileClose($neu)
    EndIf
    Do
    $check = onlinecheck()
    Until $check = "okay"

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

    $ticks = TimerDiff($timer)
    $ist = IniRead($pfad_total,"gesammelte Ticks","Anzahl","0")
    IniWrite($pfad_total,"gesammelte Ticks","Anzahl",@TAB & $ticks + $ist)

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

    _TicksToTime($ticks, $Hour, $Mins, $Secs)
    $dauer = (@TAB & $Hour & " Stunden, " & $Mins & " Minuten und " & $Secs & " Sekunden keine Verbindung zum Internet" & @TAB & "|- Ticks =" & @TAB & $ticks)
    IniWrite($pfad_total,"detailierte Liste","ab " & $startzeit & @TAB & @TAB, $dauer)

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

    $ist = IniReadSection($pfad_total,"detailierte Liste")
    IniWrite($pfad_total,"registrierte Ausfälle","Anzahl",@TAB & ($ist[0][0]))

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

    $ist = IniRead($pfad_total,"gesammelte Ticks","Anzahl","0")
    _TicksToTime($ist, $Hour, $Mins, $Secs)
    $dauer = (@TAB & $Hour & " Stunden, " & $Mins & " Minuten und " & $Secs & " Sekunden")
    IniWrite($pfad_total,"registrierte Ausfälle","Zeit Total", $dauer)

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

    $timer = 0
    EndFunc

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

    While 1
    $check = onlinecheck()
    If $check <> "okay" Then starte_protokoll()
    Sleep(5000)
    WEnd

    [/autoit]
    Ausgabe des Logfiles
    Code
    [registrierte Ausfälle]
    Anzahl			=	42
    Zeit Total		=	2 Stunden, 45 Minuten und 28 Sekunden
    
    
    [gesammelte Ticks]
    Anzahl			=	9928954.11069641
    
    
    [detailierte Liste]
    ab 03:18:12		=	0 Stunden, 0 Minuten und 4 Sekunden keine Verbindung zum Internet	|- Ticks =	4543.97407937496
    ab 03:18:00		=	0 Stunden, 0 Minuten und 15 Sekunden keine Verbindung zum Internet	|- Ticks =	15867.6528437353
    ab 03:17:49		=	0 Stunden, 0 Minuten und 27 Sekunden keine Verbindung zum Internet	|- Ticks =	27169.9057139429
    ab 03:17:38		=	0 Stunden, 0 Minuten und 38 Sekunden keine Verbindung zum Internet	|- Ticks =	38470.9664011598
    ab 03:17:26		=	0 Stunden, 0 Minuten und 49 Sekunden keine Verbindung zum Internet	|- Ticks =	49772.8459990277
    ab 03:17:15		=	0 Stunden, 1 Minuten und 1 Sekunden keine Verbindung zum Internet	|- Ticks =	61074.2914010671
    ab 03:17:04		=	0 Stunden, 1 Minuten und 12 Sekunden keine Verbindung zum Internet	|- Ticks =	72376.5900412053
    ab 03:16:53		=	0 Stunden, 1 Minuten und 23 Sekunden keine Verbindung zum Internet	|- Ticks =	83679.1611361334
    ab 03:16:41		=	0 Stunden, 1 Minuten und 34 Sekunden keine Verbindung zum Internet	|- Ticks =	94981.3580309528
    ab 03:16:30		=	0 Stunden, 1 Minuten und 46 Sekunden keine Verbindung zum Internet	|- Ticks =	106284.290955738
    ab 03:16:19		=	0 Stunden, 1 Minuten und 57 Sekunden keine Verbindung zum Internet	|- Ticks =	117586.86421546
    ab 03:16:08		=	0 Stunden, 2 Minuten und 8 Sekunden keine Verbindung zum Internet	|- Ticks =	128890.124642654
    ab 03:15:56		=	0 Stunden, 2 Minuten und 20 Sekunden keine Verbindung zum Internet	|- Ticks =	140193.376101416
    ab 03:15:45		=	0 Stunden, 2 Minuten und 31 Sekunden keine Verbindung zum Internet	|- Ticks =	151496.450974838
    ab 03:15:34		=	0 Stunden, 2 Minuten und 42 Sekunden keine Verbindung zum Internet	|- Ticks =	162799.785623541
    ab 03:15:23		=	0 Stunden, 2 Minuten und 54 Sekunden keine Verbindung zum Internet	|- Ticks =	174103.490142765
    ab 03:15:11		=	0 Stunden, 3 Minuten und 5 Sekunden keine Verbindung zum Internet	|- Ticks =	185407.027045081
    ab 03:15:00		=	0 Stunden, 3 Minuten und 16 Sekunden keine Verbindung zum Internet	|- Ticks =	196697.861245363
    ab 03:14:49		=	0 Stunden, 3 Minuten und 27 Sekunden keine Verbindung zum Internet	|- Ticks =	207989.416322052
    ab 03:14:38		=	0 Stunden, 3 Minuten und 39 Sekunden keine Verbindung zum Internet	|- Ticks =	219280.49081447
    ab 03:14:26		=	0 Stunden, 3 Minuten und 50 Sekunden keine Verbindung zum Internet	|- Ticks =	230571.650970879
    ab 03:14:15		=	0 Stunden, 4 Minuten und 1 Sekunden keine Verbindung zum Internet	|- Ticks =	241862.928026166
    ab 03:14:04		=	0 Stunden, 4 Minuten und 13 Sekunden keine Verbindung zum Internet	|- Ticks =	253154.102717621
    ab 03:13:52		=	0 Stunden, 4 Minuten und 24 Sekunden keine Verbindung zum Internet	|- Ticks =	264445.824174193
    ab 03:13:41		=	0 Stunden, 4 Minuten und 35 Sekunden keine Verbindung zum Internet	|- Ticks =	275736.996700854
    ab 03:13:30		=	0 Stunden, 4 Minuten und 47 Sekunden keine Verbindung zum Internet	|- Ticks =	287028.795162242
    ab 03:13:19		=	0 Stunden, 4 Minuten und 58 Sekunden keine Verbindung zum Internet	|- Ticks =	298320.289624699
    ab 03:13:07		=	0 Stunden, 5 Minuten und 9 Sekunden keine Verbindung zum Internet	|- Ticks =	309612.759481489
    ab 03:12:56		=	0 Stunden, 5 Minuten und 20 Sekunden keine Verbindung zum Internet	|- Ticks =	320904.784936992
    ab 03:12:45		=	0 Stunden, 5 Minuten und 32 Sekunden keine Verbindung zum Internet	|- Ticks =	332198.288637553
    ab 03:12:34		=	0 Stunden, 5 Minuten und 43 Sekunden keine Verbindung zum Internet	|- Ticks =	343491.901505583
    ab 03:12:22		=	0 Stunden, 5 Minuten und 54 Sekunden keine Verbindung zum Internet	|- Ticks =	354784.759169758
    ab 03:12:11		=	0 Stunden, 6 Minuten und 6 Sekunden keine Verbindung zum Internet	|- Ticks =	366076.774110548
    ab 03:12:00		=	0 Stunden, 6 Minuten und 18 Sekunden keine Verbindung zum Internet	|- Ticks =	378398.452295981
    ab 03:11:49		=	0 Stunden, 6 Minuten und 29 Sekunden keine Verbindung zum Internet	|- Ticks =	389692.52100778
    ab 03:11:37		=	0 Stunden, 6 Minuten und 40 Sekunden keine Verbindung zum Internet	|- Ticks =	400983.452933048
    ab 03:11:26		=	0 Stunden, 6 Minuten und 52 Sekunden keine Verbindung zum Internet	|- Ticks =	412275.173152596
    ab 03:11:15		=	0 Stunden, 7 Minuten und 3 Sekunden keine Verbindung zum Internet	|- Ticks =	423567.412304194
    ab 03:11:04		=	0 Stunden, 7 Minuten und 14 Sekunden keine Verbindung zum Internet	|- Ticks =	434859.270452046
    ab 03:10:52		=	0 Stunden, 7 Minuten und 26 Sekunden keine Verbindung zum Internet	|- Ticks =	446150.405867953
    ab 03:10:41		=	0 Stunden, 7 Minuten und 37 Sekunden keine Verbindung zum Internet	|- Ticks =	457440.89215491
    ab 03:10:30		=	0 Stunden, 7 Minuten und 48 Sekunden keine Verbindung zum Internet	|- Ticks =	468730.751579372
    Alles anzeigen


    Ich habe die Internetverbindung nur 1 mal für ca 10 Minuten getrennt. deshalb sollte in diesem Logfile auch nur 1 Eintrag in der Sektion "detailierte Liste" stehen.
    Das kann doch nur an der Schleife in der Funktion "onlinecheck" sein, oder?

  • Offlinelogger --Probleme mit timer / while-Schleife

    • Lottich
    • 23. Juni 2012 um 21:53

    Dieser Gedanke kam mir bereits, weshalb ich das auch schon umgeschrieben hab. es werden jetzt 5 verschiedene Server angepingt :)

  • Offlinelogger --Probleme mit timer / while-Schleife

    • Lottich
    • 22. Juni 2012 um 22:06

    Da hast du natürlich recht, hab nun auch den Code von $var genommen ;)

  • Offlinelogger --Probleme mit timer / while-Schleife

    • Lottich
    • 22. Juni 2012 um 21:40

    Okay es klappt jetzt. Sowol mit dem Code von $var als auch mit meinem eigenen Code.
    Der Fehler lag an der Adresse für den Ping.

    Vielen Dank an alcros für diesen Tip, da wär ich wohl nie selber drauf gekommen :D

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™