Автоотключение отправки почты через ComObject - PullRequest
Новая
       43

Автоотключение отправки почты через ComObject

0 голосов
/ 10 апреля 2019

Проблема: Я создал скрипт, который отправляет почту через ComObject, и он работает, как талисман, когда я использую его как пользователя, но не, если я выполняю его с помощью планировщика задач.

Что я наделал? Я изменил ComObjActive на ComObjCreate.

Код:

Тело правильное и содержит текст HTML. 

Myself = %AUMailAdress%
Recipient := Myself
Subject := Oi
Body := Ci
Recipient5 = Hidden@gmail.com

DocumentLocation = %SourceDir%\Tooloutput\AutoProjectsLog\Faults



olMailItem := 0
MailItem := ComObjCreate("Outlook.Application").CreateItem(olMailItem)
olFormatHTML := 2
MailItem.BodyFormat := olFormatHTML
MailItem.Subject := Subject
MailItem.HTMLBody := Body
Recipient := MailItem.Recipients.Add(Recipient)
Recipient.Type := 1 
Loop, %DocumentLocation%\*.*
MailItem.Attachments.Add(A_LoopFileLongPath)
MailItem.cc := Recipient5
MailItem.Send



ExitApp 
return

Issue: Следующая ошибка, которую я получаю, когда пытается создать ComObject.

Ошибка: 0x80080005 - сбой при выполнении сервера

Строка: #

---> 674: MailItem: = ComObjCreate («Outlook.Application»). CreateItem (olMailItem)

Непрерывно работает скрипт?

...