- Код: Выделить всё
dim oMessage, f
set oMessage = CreateObject("cdo.Message")
on error resume next
With oMessage
.HTMLBody = "test"
.HTMLBodyPart.Charset = "utf-8"
.TextBodyPart.Charset = "utf-8"
.BodyPart.Charset = "utf-8"
.To = "test@test.ru"
.From = "test@test.ru"
.Subject = "test"
.Send
if err.number<>0 then
response.write(Err.Number & " " & err.description & "<br>" )
for each f in .Configuration.Fields
response.write( f.Name & " = " & f.value & "<br>")
next
end if
end with
На сервере установлена служба SMTP, IIS. При выполнении этого скрипта с помощью WSH, все проходит нормально, письмо отправляется и приходит. При оформлении же его как ASP-скрипта (или aspx) и выполнении из-под IIS, происходит ошибка "Недопустимое значение конфигурации "SendUsing"." Вот конфигурация:
-2147220960 Недопустимое значение конфигурации "SendUsing".
http://schemas.microsoft.com/cdo/config ... nguagecode = ru
http://schemas.microsoft.com/cdo/config ... /postusing = 0
http://schemas.microsoft.com/cdo/config ... /sendusing = 0
http://schemas.microsoft.com/cdo/config ... sponsetext = Истина
urn:schemas:calendar:timezoneid = 51
Выполнение того же самого asp-скрипта на Windows Server 2008 Web Edition x86 RU происходит без ошибок, письмо доходит. Все настройки IIS и SMTP на обоих серверах одинаковые (на x64 в IIS включен режим совместимости с 32х битными приложениями), единственное замеченное мной отличие — в названии SMTP-сервиса: "Simple Mail Transfer Protocol (SMTP)" на Web и "Протокол SMTP" на R2.
Облазил весь гугл и MSDN, искал и текст ошибки, и код в разных форматах записи, нашел только советы поиграться с настройкой конфигурации, которые результата не дали.