Как использовать CDO с Exchange с vbscript

Я пытаюсь настроить скрипт для отправки по электронной почте с использованием учетной записи обмена. Я хочу использовать CDO (или эквивалент) с vbscript. Цель состоит в том, чтобы отслеживать сообщения электронной почты через папку отправленных учетной записи обмена. Я использую биржу 2007.


exchange-server vbscript exchange-server-2007 cdo.message
person Francis Fetsch    schedule 08.06.2011    source источник

Ответы (1)


arrow_upward
4
arrow_downward

Используйте Microsoft NTLM (http://msdn.microsoft.com/en-us/library/aa378749%28v=vs.85%29.aspx) В CDO это перечисление CdoProtocolsAuthentication (http://msdn.microsoft.com/en-us/библиотека/ms526961%28v=exchg.10%29.aspx )

Const cdoSendUsingPickup = 1 'Send message using the local SMTP service pickup directory. 
Const cdoSendUsingPort = 2 'Send the message using the network (SMTP over the network). 

Const cdoAnonymous = 0 'Do not authenticate
Const cdoBasic = 1 'basic (clear-text) authentication
Const cdoNTLM = 2 'NTLM

dim objEmail
    Set objEmail = CreateObject("CDO.Message") 
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing")= cdoSendUsingPort 
'Name or IP of remote SMTP server
objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") ="exchange"
'Server port
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") =25 

objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpAuthenticate") = cdoNTLM 
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/NNTPAccountName") = "USERNAME"
 objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/SaveSentItems") = TRUE

objEmail.Configuration.Fields.Update
objEmail.From = "FROM <[email protected]>"
    objEmail.To = "[email protected]"
    objEmail.Subject = "SUBJECT"
    objEmail.Textbody = "BODY " 
    objEmail.Send
person NeerPatel    schedule 08.06.2011
comment
Это SMTP, а не обмен - person Wobbles; 26.09.2017