使用经典 ASP 发送邮件？答案

【问题标题】：Sending mail using classic ASP?使用经典 ASP 发送邮件？
【发布时间】：2013-11-01 12:56:11
【问题描述】：

我正在尝试使用经典 ASP 发送邮件，但我的页面包含一些错误，这就是为什么当上传显示错误的页面：

500 内部服务器错误

这是我正在使用的代码；

<%
Dim smtpserver,youremail,yourpassword,ContactUs_Name,ContactUs_Tel,ContactUs_Email
Dim ContactUs_Subject,ContactUs_Body,Action,IsError

smtpserver = "smtp.gmail.com"
youremail = "xxxxx.yyyyyy@gmail.com"
yourpassword = "password" 

Dim ObjSendMail
Set ObjSendMail = CreateObject("CDO.Message") 
ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 
ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com"
ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 587 
ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = 1 'Use SSL for the connection
ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 'basic (clear-text) authentication
ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername") = "aaaaa.bbbbbb@gmail.com"
ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "password"
ObjSendMail.Configuration.Fields.Update
ObjSendMail.To = "aaaaa.bbbbbb@gmail.com"
ObjSendMail.CC = "cccccc.dddddd@sunarctechnologies.com"
ObjSendMail.Subject = "Subject"
ObjSendMail.From = "xxxxx.yyyyyy@gmail.com"
ObjSendMail.HTMLBody = "<p>hello</p>"
ObjSendMail.Send
Set ObjSendMail = Nothing 
%>

我对经典的 asp 没有任何概念，这只是从其他来源复制粘贴代码。

【问题讨论】：

这些包含http://schemas.microsoft.com/cdo/configuration/... 的行仍然正确吗？

标签： email asp-classic smtp

【解决方案1】：

您的代码看起来正确，但我会检查 gmail 是否仅接受端口 465 上的 SSL 连接。我相信端口 567 用于 TLS 连接。或者，只需尝试端口 25。

This question is similar to yours.

您还确实需要能够查看您的应用程序报告的详细错误消息。

【讨论】：

【解决方案2】：

假设您可以访问 IIS，我建议的第一件事是激活服务器端调试并将错误发送到 IIS 中的浏览器。如果找不到对象，则错误 500 可能意味着任何形式的缺失。使用适当的错误消息将有助于缩小问题的根源。

【讨论】：