Senden von Outlook-E-Mails mit eingebettetem Bild mit VBS

Ich verwende derzeit das folgende VBS-Skript, um eine E-Mail zu senden, und es funktioniert einwandfrei. Das Bild wird jedoch als Anhang gesendet. Ich möchte das Bild stattdessen in die E-Mail einbetten. Ich verstehe, dass ich auf den Anhang im HTML-Text der E-Mail verweisen muss, aber ich habe Mühe, dies zu tun.

Irgendwelche Vorschläge?

Dim ToAddress
Dim FromAddress
Dim MessageSubject
Dim MyTime
Dim MessageBody
Dim MessageAttachment
Dim ol, ns, newMail
MyTime = Now

ToAddress = "[email protected]"
MessageSubject = "Auto Stats " & MyTime
MessageBody = "Stats Attached" & vbCrLf & "Produced at " & MyTime
MessageAttachment = "P:\stats.png"
Set ol = WScript.CreateObject("Outlook.Application")
Set ns = ol.getNamespace("MAPI")
Set newMail = ol.CreateItem(olMailItem)
newMail.Subject = MessageSubject
newMail.Body = MessageBody
newMail.RecipIents.Add(ToAddress)
newMail.Attachments.Add(MessageAttachment)
newMail.Send

Antworten auf die Frage(2)

Ihre Antwort auf die Frage