这是我的完整代码。整个页面中没有其他代码。
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”文件夹中,它运行得很好。
答案 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