Hallo!
Ich würde gerne Emails per Outlook versenden, die ein Bild im Text enthalten. (HTML Body)
Das ist Erstellen und Versenden funktioniert auch wunderbar dank Waters OutlookEX UDF.
Die erstellten Mails enthalten auch das Bild und in Outlook werden sie auch richtig dargestellt, nur mit der Büroklammer als Schönheitsfehler.
In anderen Mailclients wird das Bild aber überhaupt nicht in der Email dargestellt sondern "nur" als Anhang.
Water wurde dazu schon vor mehr als 10 Jahren im Englischen Forum tätig.
Dort hatte er auf die Webseite http://www.outlookcode.com verwiesen. Beitrag aus dem englischen Forum
Diese ist leider nicht mehr verfügbar und somit konnte ich nicht nachsehen.
Hat jemand von euch eine Idee wie ich das Bild als Anhang einbinde damit es im Text sichtbar ist und nicht als Anhang selber zum Downloaden angeboten wird.
Hier mein Testcode:
#include <OutlookEx.au3>
$oOutlook = _OL_Open()
$oMail = _OL_ItemCreate($oOutlook, $olMailItem, "*", "", "Subject=TestMail", "BodyFormat=" & $olFormatHTML, _
'HTMLBody=This is a picture.<img src="cid:The_Outlook.jpg">This is more text.')
If @error <> 0 Then Exit MsgBox(16, "OutlookEX UDF: _OL_ItemCreate Example Script", "Error creating a mail item. @error = " & @error & ", @extended = " & @extended)
$oItem = _OL_ItemAttachmentAdd($oOutlook, $oMail, Default, @ScriptDir & "\The_Outlook.JPG")
If @error <> 0 Then Exit MsgBox(16, "OutlookEX UDF: _OL_ItemCreate Example Script", "Error adding an attachment to the mail item. @error = " & @error & ", @extended = " & @extended)
_OL_ItemRecipientAdd($oOutlook, $oMail, Default, $olBCC, "test.test@test.com")
_OL_ItemSend($oOutlook, $oMail, Default)
;$oMail.Display
_OL_Close($oOutlook)
Alles anzeigen