cdo.message.send之后的代码不会在经典ASP中执行

时间:2013-08-14 15:17:39

标签: asp-classic send windows-server-2008-r2 cdo.message

这是我的完整代码。整个页面中没有其他代码。

Set myMail=CreateObject("CDO.Message")
myMail.Subject="Sending email with CDO"
myMail.From="abcd@example.com"
myMail.To="abc@example.com"
myMail.TextBody="This is a message. "
Response.write "Execution Reached Before Send!"
myMail.Send
Response.write "Execution Reached After Send!"
set myMail=nothing

当我运行这个asp页面时,我得到的结果是“在发送之前达到执行!”。没有其他错误消息。我可以从中理解的是myMail之后的任何内容。发送没有被执行,我也没有收到任何电子邮件。

我使用的是Windows Server 2008 R2 Standard(Service Pack 1)。 SMTP邮件服务器安装在本地计算机上。我创建了一个测试电子邮件并放在“C:\ inetpub \ mailroot \ Pickup”文件夹中,它运行得很好。

1 个答案:

答案 0 :(得分:0)

在发送之前添加这四行之后,代码工作了。

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