2009-02-24 203 views
5

我试图获得使用ASP classic发送的电子邮件,并且在配置SMTP时遇到问题。SMTP配置SendUsing配置值对ASP-Classic无效

错误:

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

守则(用于电子邮件本身):

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

代码中,我试图用(PT 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 

那没有工作,所以我试过:

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 

这也没有奏效。

(是的,我没有表现出来,但最后有到objMsg.Send通话)

据我所知道的,当地盒SMTP服务正在运行,并准备尽自己的职责。

任何人都可以帮忙吗?

回答

16

如果您指定smptserver,请务必将 'sendusing' 字段设置为2(或cdoSendUsingPort),以及:

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