2

我正在使用 asp 创建一个网页，该网页应该向多个客户发送电子邮件。有人建议我使用 CDO 电子邮件功能。这是经典asp网页的最佳解决方案吗？或者添加 asp.net 和 ajax 来处理电子邮件这种事情会更好。

4

3 回答 3

3

CDO 将是显而易见的途径。在某些版本的 .Net Framework 中，ASP.Net 无论如何都会使用 CDO 的包装器。

我不知道 Ajax 在哪里适合这个主题。

粗鲁和粗鲁（最好参考 global.asa 中的库以获取类型信息并避免长字段 ID 字符串和幻数）示例复制/粘贴且未经我验证：

<% 
    sch = "http://schemas.microsoft.com/cdo/configuration/" 

    Set cdoConfig = CreateObject("CDO.Configuration") 

    With cdoConfig.Fields 
        .Item(sch & "sendusing") = 2 ' cdoSendUsingPort 
        .Item(sch & "smtpserver") = "<enter_mail.server_here>" 
        .Update 
    End With 

    Set cdoMessage = CreateObject("CDO.Message") 

    With cdoMessage 
        Set .Configuration = cdoConfig 
        .From = "from@me.com" 
        .To = "to@me.com" 
        .Subject = "Sample CDO Message" 
        .TextBody = "This is a test for CDO.message" 
        .Send 
    End With 

    Set cdoMessage = Nothing 
    Set cdoConfig = Nothing 
%>
于 2011-03-10T20:19:11.337 回答
1

您想将 Ajax 添加到 ClassicASP 吗？我会说你是在自找麻烦。如果可能的话，我会鼓励客户转向 .net 技术。从长远来看，他们会感激不尽。

至于 CDO 对象，试试这个链接How do I send e-mail with CDO?

于 2011-03-10T20:44:35.350 回答
1

它在 ASP Classic 上使用 GoDaddy 主机上的 CDO 以这种方式工作：

<%
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") ="relay-hosting.secureserver.net"
ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = False
ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
ObjSendMail.Configuration.Fields.Update


'ObjSendMail.AddAttachment mPath, "Logo.gif"
'ObjSendMail.AddAttachment ArrwPath, "red_arrw.gif"

ObjSendMail.Subject = strSub
ObjSendMail.To = strTo
ObjSendMail.From = strFrom
ObjSendMail.Bcc = strBcc
ObjSendMail.Cc = strCc
ObjSendMail.HTMLBody = strMsg

ObjSendMail.Send
        Set ObjSendMail = Nothing

%>
于 2015-01-20T18:13:22.287 回答