Отправка электронной почты Outlook со встроенным изображением с помощью VBS
В настоящее время я использую следующий сценарий VBS для отправки электронной почты, и он отлично работает, однако изображение отправляется в виде вложения. Вместо этого я хотел бы вставить изображение в электронное письмо. Я понимаю, что должен ссылаться на вложение в теле HTML письма, но я изо всех сил стараюсь это сделать.
Какие-либо предложения?
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