2009-02-24 7 views
5

Próbuję uzyskać wiadomość e-mail wysłaną za pomocą ASP classic i mam problem z konfiguracją SMTP.Konfiguracja SMTP SendUsing wartość konfiguracji jest nieprawidłowa z ASP-Classic

Błąd:

CDO.Message.1 error '80040220' The "SendUsing" configuration value is invalid.

Kodeks (dla samego e-mail):

Set objMsg = Server.CreateObject("CDO.Message") 
objMsg.From  = "[email protected]" 
objMsg.To  = "[email protected]" 
objMsg.Subject = "Procurement Ally Update" 
objMsg.TextBody = strBody 

Kodeks próbowałem skonfigurować z (pkt 1):

sch = "http://schemas.microsoft.com/cdo/configuration/" 
Set cdoConfig = CreateObject("CDO.Configuration") 
    With cdoConfig.Fields 
     .Item(sch & "smtpserver") = "127.0.0.1" 
     .update 
    End With 

Że nie działa, więc próbowałem:

objMsg.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "localhost" 
objMsg.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 
objMsg.Configuration.Fields.Update 

To też nie zadziałało.

(Tak, nie pokazują, ale w końcu nie jest to wezwanie do objMsg.Send)

O ile mogę powiedzieć, usługa SMTP lokalne skrzynki działa i jest gotowa zrobić swój obowiązek.

Czy ktoś może pomóc?

Odpowiedz

16

Jeśli określając smptserver, należy ustawić 'sendusing' pole do 2 (lub cdoSendUsingPort), a także:

objMsg.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 
objMsg.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "localhost" 
objMsg.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 
objMsg.Configuration.Fields.Update