Я делаю изменения кода для поддержки Outlook. У меня проблемы с отправкой электронной почты, когда я впервые открываю outlook, т.е. она отображает электронную почту, а не отправляет ее. Но со второго раза он автоматизирует электронную почту. А также .Отправить не поддерживается в моем случае. Поэтому я использую Sendkeys.

Я пробовал GetObject, createObject, но это не решает мою проблему.

Пожалуйста, предложите любое решение для этого.

Заранее спасибо

1 ответ1

0

Вот полностью рабочий VBScript для отправки электронной почты (он работает с закрытым и открытым Outlook):

Set objApp = CreateObject("Outlook.Application")
Set objMail = objApp.CreateItem(0)
Set objRecip = objMail.Recipients.Add("Test User")
objRecip.Resolve
objMail.Subject = "Test"
objMail.Save
objMail.Send
objApp.Session.SendAndReceive(False)

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .