Beiträge von Oscar

  • Oscars POP-Show

    Du hast 1238 EMails auf dem Server liegen?
    Dann wundert es mich nicht, dass das ewig dauert. ^^
    Ich denke, das würde auch mit Thunderbird ziemlich lange dauern, die herunterzuladen. :S
    Und für eine Statusanzeige müsste ich die POP3-UDF ändern. Mal sehen, kommt evtl. in einer der nächsten Versionen.

  • Oscars POP-Show

    Na klar, StringSplit gibt immer ein Array zurück, da ist es natürlich dämlich mit IsArray zu prüfen. :pinch:
    Jetzt (Version 1.0.0.6) sollte es aber funktionieren.

    @Fabian: Den Spamfilter (Blacklist) setze ich mal auf die ToDo-List. Danke!

  • Problem mit Sonderzeichen-Zeichensätzen in EMails

    Also, das Problem ist folgendes: Ich bekomme manchmal EMails mit Sonderzeichen in den Absender-, Empfänger- und/oder den Betreff-Angaben.
    Das Ganze sieht dann so aus:

    Zitat

    =?iso-8859-9?B?QWlkYXRz/XogQXJh5yBUYWtpcA==?=


    iso-8859-9 kennzeichnet den türkischen Unicode-Zeichensatz (soviel konnte ich schonmal "ergoogeln").
    Aber es kommen auch EMails mit westeuropäischen Zeichensatz:

    Zitat

    =?ISO-8859-1?Q?Multifunktionslader f=FCr 12-V-Bleiakkus nur 84,95 Euro!?=


    Oder das Ganze als UTF-8:

    Zitat

    =?utf-8?Q?F=C3=BCr_Ihre_sch=C3=B6nsten_Momente:_ifolor_FotoBuch_schon_ab_?=

    Meine Frage: Gibt es eine Funktion, um diesen "Kauderwelsch" in etwas lesbareres umzuwandeln?
    Wenn ich wüsste, wie man diese Art der Zeichensatzkodierung nennt, würde Google vielleicht nicht 8 Millionen Ergebnisse ausspucken. Wäre dankbar für ein paar Tips. ^^

  • Oscars POP-Show

    Stimmt, beim Account löschen gab es noch einen Bug, wenn das der letzte Account war und man dann einen neuen erstellt hat. Ist jetzt behoben! Neue Version in Post #1.
    Danke für den Hinweis!

  • Oscars POP-Show

    Version 1.2.0.2 (24.08.10)

    "Oscars POP-Show" ist ein Programm zum bearbeiten von EMails direkt auf dem POP3-Server.

    Zuerst muss man ein oder mehrere Konten anlegen (die Auswahl geschieht dann mittels Combobox). Dazu muss man die POP3-Zugangsdaten in die entsprechenden Felder eintragen. Die Zugangsdaten werden verschlüsselt auf der Festplatte gespeichert, damit niemand so einfach Zugriff darauf hat. Die Datei heißt "POP-Show.acc" und liegt im "config"-Unterordner des Skriptordner. Diese Datei nicht weitergeben! Sie enthält die POP3-Zugangsdaten!

    Nach dem aktualisieren (Button links unten) kann man eine EMail markieren und sich den Header oder die gesamte EMail als Klartext anzeigen lassen.
    Außerdem kann man eine oder mehrere EMails markieren und direkt vom Server löschen lassen. Es erfolgt noch eine Nachfrage, aber dann werden die EMails unwiederbringlich gelöscht!

    Ab Version 1.1 kann man nun zwei Blacklists anlegen. Eine für den Absender und eine für den Betreff. Jede Zeile stellt einen Eintrag dar nach dem gefiltert wird.
    Dabei werden die EMails beim aktualisieren lediglich farblich markiert, nicht automatisch gelöscht. Im Kontextmenü des Listviews gibt es den Eintrag "Spam markieren (anhand der Blacklisten)". Damit werden dann die Spam-EMails markiert und man kann sie mit dem "Löschen"-Button vom Server löschen.

    Neu in Version 1.2:
    - Absender/Betreff kann nun im Kontextmenü der entsprechenden Blacklist hinzugefügt werden
    - Das POP3-Passwort wird nun standardmäßig in Sternchen dargestellt. Zum anzeigen im Klartext gibt es eine Checkbox.
    - Verbindungsaufbau zum Server erfolgt jetzt nur noch beim wechseln des Kontos bzw. nach dem löschen von EMails. Damit sind die Probleme mit zu vielen Verbindungen (z.B. bei GMX) behoben.
    - Der Check, ob überhaupt EMails vorhanden sind, geschieht nun per _POP3Stat(). Das verhindert Probleme mit zu geringer ResponseTime (hatte ich vorher bei _POP3List() verringert).
    - Beim wechseln des Kontos wird nun automatisch auch ein Refresh durchgeführt.

    Neu in Version 1.2.0.1:
    - Es werden nun auch Yahoo-Konten unterstützt.

    Neu in Version 1.2.0.2:
    - Die Yahoo-Unterstützung in die POP3-UDF ausgelagert. So muss man beim Server nicht unbedingt den Servernamen eingeben, sondern kann auch die IP verwenden.
    - Die Datums-/Zeit-Konvertierfunktion verursachte einen Absturz (Arrayfehler), wenn in der EMail die Zeit falsch angegeben war. Behoben!

    Screenshot:
    Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

    An dieser Stelle möchte ich Stilgar danken, für die tolle POP3-UDF. :thumbup:

    Das Programm, das Skript, die UDFs und die Icons befinden sich im ZIP-Archiv (Anhang).

  • Tabitem mit Rechtsklick entfernen

    Geht sogar noch einfacher:

    Spoiler anzeigen
    [autoit]


    #include <GUIConstantsEx.au3>
    #include <GuiTab.au3>

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

    ; Create GUI
    $hGui = GUICreate("Tab Control Get Item RectEx", 400, 300)
    $hTab = GUICtrlCreateTab(2, 2, 396, 296)
    GUISetState()

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

    ; Add tabs
    _GUICtrlTab_InsertItem($hTab, 0, "Tab 1")
    _GUICtrlTab_InsertItem($hTab, 1, "Tab 2")
    _GUICtrlTab_InsertItem($hTab, 2, "Tab 3")
    _GUICtrlTab_InsertItem($hTab, 3, "Tab 4")
    _GUICtrlTab_InsertItem($hTab, 4, "Tab 5")
    _GUICtrlTab_InsertItem($hTab, 5, "Tab 6")
    _GUICtrlTab_InsertItem($hTab, 6, "Tab 7")

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

    ; Loop until user exits
    Do
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case -3
    Exit
    Case $GUI_EVENT_SECONDARYUP
    $aInfo = GUIGetCursorInfo($hGui)
    $aHit = _GUICtrlTab_HitTest($hTab, $aInfo[0], $aInfo[1])
    If $aHit[1] <> 1 Then _GUICtrlTab_DeleteItem($hTab, $aHit[0])
    EndSwitch
    Until False

    [/autoit]

  • Tabitem mit Rechtsklick entfernen

    SEuBo: Dein Beispiel funktioniert bei mir auch nicht. Liegt vielleicht an Win7, 64 Bit?!

    Aber so geht es auch:

    Spoiler anzeigen
    [autoit]


    #include <GuiTab.au3>

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

    ; Create GUI
    $hGui = GUICreate("Tab Control Get Item RectEx", 400, 300)
    $hTab = GUICtrlCreateTab(2, 2, 396, 296)
    GUISetState()

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

    ; Add tabs
    _GUICtrlTab_InsertItem($hTab, 0, "Tab 1")
    _GUICtrlTab_InsertItem($hTab, 1, "Tab 2")
    _GUICtrlTab_InsertItem($hTab, 2, "Tab 3")
    _GUICtrlTab_InsertItem($hTab, 3, "Tab 4")
    _GUICtrlTab_InsertItem($hTab, 4, "Tab 5")
    _GUICtrlTab_InsertItem($hTab, 5, "Tab 6")
    _GUICtrlTab_InsertItem($hTab, 6, "Tab 7")

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

    ; Loop until user exits
    Do
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case -3
    Exit
    EndSwitch
    $aInfo = GUIGetCursorInfo($hGui)
    If $aInfo[3] Then
    $aHit = _GUICtrlTab_HitTest($hTab, $aInfo[0], $aInfo[1])
    If $aHit[1] <> 1 Then
    _GUICtrlTab_DeleteItem($hTab, $aHit[0])
    Do
    $aInfo = GUIGetCursorInfo($hGui)
    Until Not $aInfo[3]
    EndIf
    EndIf
    Until False

    [/autoit]

  • Verteilung unterschiedlicher Gewichtungen

    Ich verstehe Dein "System" nicht so ganz.
    Wenn der Inhalt der Array-Elemente die Gewichtung darstellt, wo ist dann der "richtige" Inhalt? Müsste das nicht ein 2D-Array sein?
    Und wie stellst Du Dir eine "gleichmäßige Verteilung" vor?
    Vielleicht mal anhand eines Beispiels erklären...

  • Script mittels button innerhalb einer Schleife beenden

    Oder so:

    Spoiler anzeigen
    [autoit]


    #include <Date.au3>
    #include <GUIConstantsEx.au3>

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

    $splash = SplashTextOn("Countdown: ", "", 300, 40, 460, 62, 20, "", 10)

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

    $Form1 = GUICreate("form1", 270, 92, 531, 416)
    $Button1 = GUICtrlCreateButton("Beenden", 8, 32, 70, 25, 0)

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

    GUISetState()
    $Countdown = 10
    _Countdown()
    AdlibRegister('_Countdown', 1000)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE, $Button1
    AdlibUnRegister('_Countdown')
    Exit
    EndSwitch
    WEnd

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

    Func _Countdown()
    Local $seconds, $sec
    $Countdown -= 1
    If $Countdown = -1 Then
    AdlibUnRegister('_Countdown')
    ControlSetText($splash, "", "Static1", "abgelaufen")
    Return
    EndIf
    $seconds = _DateAdd('s', $Countdown, _NowCalc())
    $sec = _DateDiff('s', _NowCalc(), $seconds)
    $string = StringFormat("%.02d" & ":" & "%.02d" & ":" & "%.02d", _
    Mod($sec / 3600, 24), Mod(($sec / 60), 60), Mod($sec, 60))
    ControlSetText($splash, "", "Static1", $string)
    EndFunc

    [/autoit]

  • PixelGetColorHilfe

    Zitat

    You agree that you will not, under any circumstances:
    [...]
    F.use any unauthorized third party programs, including but not limited to "mods," "hacks," "cheats," "scripts," "bots," "trainers," and automation programs, that interact with the Software in any way, for any purpose, including but not limited to any unauthorized third party programs that intercept, emulate, or redirect any communication between the Software and Riot Games and any unauthorized third party programs that collect information about the Game by reading areas of memory used by the Software to store information.

    Das sagt wohl alles. [Thread closed]