Vbs Multiple Line Email

Я использую файл vbs для отправки электронной почты, но он отправляет его только в одной строке. Я хочу, чтобы это было несколько строк с & vbCRLF, но это не работает для меня.Vbs Multiple Line Email

Пожалуйста, помогите мне с электронными сообщениями vbs с несколькими текстовыми текстами.

Мой код:

Set emailObj  = CreateObject("CDO.Message") 
emailObj.From  = "[email protected]" 
emailObj.To  = "[email protected]" 
emailObj.Subject = "Test CDO" 
emailObj.TextBody = "Test CDO" & vbCRLF & "Test CDO line 2" 
Set emailConfig = emailObj.Configuration 
emailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com" 
emailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 465 
emailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 
emailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 
emailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpusessl")  = true 
emailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendusername") = "YourUserName" 
emailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "Password1" 
emailConfig.Fields.Update 
emailObj.Send 
If err.number = 0 then Msgbox "Done"

источник

2015-08-31 Pankaj Kumar

Добавить свой код в свой вопрос, он может отличаться от ответа. Ваше сообщение отправлено в HTML? Если да, вы пробовали с
? –

Нет, я не использую HTML. Я обновил свой код. Пожалуйста помоги ! –

Это отлично работает для меня в Outlook для Windows, Outlook для Mac и в клиенте Gmail. Какой почтовый клиент вы используете для чтения результата? – joehanna

Вот как я это сделал, только с помощью «.HTMLBody», чтобы иметь возможность добавлять форматирование. Прекрасно работает с учетом перспективы.

Set objOutlook = CreateObject("Outlook.Application") 
     Set objMail = objOutlook.CreateItem(0) 
    with objMail 
     .Display 'To display message 
     .To = "[email protected]" 
     .cc = "[email protected]" 
     .Subject = "FYI" 
     .HTMLBody = "<HTML><BODY><p>Dear Team,</p><P> Please be informed, </p><P> Regards, </p><P><B> My Name </B><br><big><i>My Company</i> </big>(of awesomeness) </br></p></BODY></HTML>" 


    end with

источник

2016-09-28 16:39:29 WannabeProger

Vbs Multiple Line Email

ответ

Смежные вопросы