Outlookを使用して受信者にメールを自動的に送信するコードをvbscriptで記述しました。すべて正常に機能していますが、問題が1つだけあります。メッセージ本文に選択した形式が、受信者のメールボックスで変更されfont color- blue and font face -calibri but it got changed into Times new roman without any color
ます。
解決策はありますか?
Set MyApp = CreateObject("Outlook.Application")
Set MyItem = MyApp.CreateItem(0) 'olMailItem
With MyItem
.To = "abc@com"
.Subject = ""
.ReadReceiptRequested = False
.HTMLBody = "<font size='3' face='Calibri' color='#151B54'>Hi,Whatever written here got changed into plain text.<font>"
.Attachments.Add "C:\Excels\"& objFso.GetFileName(objFile.path)
End With
MyItem.Display
End if
または、送信メールの見通しを変更する必要がある設定はありますか?