Beiträge von 4ern

  • OutlookEXudf

    So nun hätte ich doch noch eine Frage.

    Und zwar verschicke ich eine E-Mail an ein Postfach.

    [autoit]

    Global $oOutlook = _OL_Open()
    _OL_Wrapper_SendMail($oOutlook, $QualityMailAdress, "", "", "Chat // " & $msisdnChat3,$ProtokollChat1,"", $olFormatPlain, $olImportanceHigh)
    _OL_Close($oOutlook)

    [/autoit]

    nun möchte ich diese verschickte E-Mail (die nur Protokolle enthält) sofort wieder löschen, da ich nur einen begrenzten Mail Speicher habe. Leider komme ich nicht wirklich weiter.

    Folgenden Code brauch ich dafür, jedoch versteh ich nicht wie ich die gerade verschickt Mail indifizieren soll? bzw. was ich nicht wie ich die "EntryID" herausfinden soll?

    [autoit]

    Global $oOutlook = _OL_Open()
    Global $aOL_Item = _OL_ItemFind($oOutlook, "*\Outlook-UDF-Test\SourceFolder\Mail", $olMail, "", "", "", "EntryID")
    If $aOL_Item[0][0] = 0 Then Exit MsgBox(16, "OutlookEX UDF: _OL_ItemDelete Example Script", "Could not find a mail item in folder 'Outlook-UDF-Test\SourceFolder\Mail'. @error = " & @error)
    _OL_ItemDelete($oOutlook, $aOL_Item[1][0], Default)
    If @error <> 0 Then Exit MsgBox(16, "OutlookEX UDF: _OL_ItemDelete Example Script", "Error deleting mail. @error = " & @error & ", @extended = " & @extended)
    _OL_Close($oOutlook)

    [/autoit]

  • OutlookEXudf

    Hallo zusammen,

    ich habe ein kleines Problem, evtl. steh ich nur auf dem Schlauch.

    Ich kopiere einen Chat Verlauf aus einer Anwendung und möchte diesen über Outlook als reine Textmail verschicken. Das Problem ist nun, dass alle Zeilen Umbrüche verschwinden und somit ein Fließtext per E-Mail verschickt wird???

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

    #include <OutlookEx.au3>

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

    $oTextMail = "Hallo zusammen" & @lf & "Das ist eine Test Mail" & @lf & "Das ist eine Test Mail" & @lf & "Das ist eine Test Mail" & @lf & "Das ist eine Test Mail"

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

    $oOL = _OL_Open()
    _OL_Wrapper_SendMail($oOL, "your@mail.de", "", "", "Testmail", "$oTextMail", "", $olFormatHTML, $olImportanceHigh)

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

    Vielen Dank für eure Hilfe

  • ISN AutoIt Studio

    Ich habe das Problem, dass wenn ich die Minus Taste auf dem Num Block drücke, mir der gesamte Zeilen Code Auskommentiert wird. Das möchte ich aber nicht und weis leider nicht wie ich das abstellen kann?

  • Controlgettext("") von unbekanntem aber fokussiertem control herausfinden

    Die einfachste Möglichkeit ist mit relativen Mauspositionen zum Fenster zu arbeiten. Damit kommst du schnell zum gewünschten Ergebniss.

    Hoffe es hilft dir weiter. Schau dir doch mal die Hilfe an, meistens kommte man beim durchschauen von möglichen Funktionen auf die gewünschte Lösung.

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #include <ProgressConstants.au3>
    #include <WindowsConstants.au3>

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

    Opt("GUIOnEventMode", 1)
    $Form1 = GUICreate("Form1", 560, 57, -1, -1)
    GUISetOnEvent($GUI_EVENT_CLOSE, "Form1Close")
    GUISetState(@SW_SHOW)

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

    While 1
    _task0()
    WEnd

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

    Func _task0()

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

    Opt("MouseCoordMode", 0)
    Opt("WinTitleMatchMode", 2)

    Local $xMouse = 292
    Local $yMouse= 240
    Local $ohWndTitel1 = "Dokument1"
    Local $ohWndTitel2 = "Adressen"

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

    Local $ohWndCheck = WinExists($ohWndTitel1)

    if $ohWndCheck = 0 Then
    MsgBox(4096, "", "Starte Word-Datei, die ein simples Makro enthält...")
    ShellExecute (@Scriptdir & "\test.dotm") ; sollte die Datei mit dem Standartprogramm öffnen
    endif

    WinActivate($ohWndTitel1)
    WinWaitActive($ohWndTitel1)

    Local $ohWndCheck2 = WinExists($ohWndTitel2)

    if $ohWndCheck2 = 1 Then
    WinActivate($ohWndTitel2)
    Else
    MsgBox(16,"Formular","Das Formular ist nicht geöffnet. Bitte das Formular öffnen.",0)
    EndIf

    WinWaitActive($ohWndTitel2)
    MouseClick("left", $xMouse, $yMouse, 1)

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

    Exit
    EndFunc

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

    Func Form1Close()
    Exit
    EndFunc

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

  • Message Abfangen und Pausieren

    Hallo zusammen, ich bräuchte erneut eure Hilfe.

    Ich möchte von einer Externen Anwendung einen Controll Klick abfangen und so lange Pausieren, bis eine AutoIt Funktion erfolgreich ausgeführt wurde. Jeoch stoße ich hier ein meine Grenzen :S

    Folgenen Daten konnte ich aus diesem Controll heraus finden:

    Window Handle: 0030EBC
    Message: 202B (Sent) // WM_User+7211
    wParam: 00030EBC
    IParam: 0605E4A8

    Ich habe bereits diesen Post& diesen Poststudiert, aber leider nicht wirlich schlau daraus geworden.

    Ich danke euch für eure Hilfe und hilfreichen Tipps.