Я пытаюсь отправить электронное письмо с классическим ASP (я застрял со старым приложением, поэтому мне нужно использовать классический ASP здесь) на Windows Server 2008 R2, IIS 7.5.
Я предполагаю, что многое изменилось с win server 2003 на 2008. Я использую следующий код, но получаю эту ошибку (кстати, сообщение об ошибке настолько "информативно");
ошибка '8004020f'
/ poo.asp, строка 32
Вот код;
<!--
METADATA
TYPE="typelib"
UUID="CD000000-8B95-11D1-82DB-00C04FB1625D"
NAME="CDO for Windows 2000 Library"
-->
<%
'Declare variables
Dim sch, cdoConfig, cdoMessage
sch = "http://schemas.microsoft.com/cdo/configuration/"
Set cdoConfig = CreateObject("CDO.Configuration")
With cdoConfig.Fields
.Item(cdoSendUsingMethod) = cdoSendUsingPort
.Item(cdoSMTPServer) = "mail.example.com"
'Set SMTP port which is 25 by default
.Item(sch & "smtpserverport") = 587
.Update
End With
Set cdoMessage = CreateObject("CDO.Message")
With cdoMessage
Set .Configuration = cdoConfig
.From = "info@example.com"
.To = "me@example2.com"
.Subject = "Sample CDO Message"
.TextBody = "This is a test for CDO.message"
.Send
End With
Set cdoMessage = Nothing
Set cdoConfig = Nothing
Response.write "<HTML><head><title>A message has been sent.</title></head><body>A message has been sent.</body></HTML>"
%>
Кроме того, я только что установил MAPI-клиент Microsoft Exchange Server и объекты данных совместной работы 1.2.1 из http://www.microsoft.com/download/en/details.aspx?displaylang=en&id=1004 на свой сервер, но это ничего не изменило.
ПРИМЕЧАНИЕ: Я мог бы отправлять электронную почту через localhost, если он работает. не имеет значения.