email - 在 ASP 中发送电子邮件(CDO 消息)每次挂起大约 5 到 10 秒

Question

我正在使用此代码发送电子邮件:

Set myMail=CreateObject("CDO.Message")
myMail.Subject="Sign-up"
myMail.From="support@abc.com"
myMail.To="support@abc.com"
myMail.HTMLBody = signup
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusing")=2
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserver")="smtp.1and1.com"
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserverport")=25 
myMail.Configuration.Fields.Update
myMail.Send
set myMail=nothing

执行此操作时，页面挂起。大约需要 5 到 10 秒才能继续。抱歉，如果这是微不足道的，但我是否需要一个单独的排队机制，因为我在其他网站上没有这样做。他们是如何做到这一点的？

Answer 1

邮件收到了吗？你说它需要几秒钟才能继续 - 你是什么意思？

我查看了我的一些 asp cdo 代码，我认为你必须实例化一个 CDO.Configuration 对象。也许有一个为您设置配置值的函数，例如:

Function GetConfig()
Dim oConfig
Set oConfig = CreateObject("CDO.Configuration")
oConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
    'etc...
     oConfig.Fields.Update
     Set GetConfig = oConfig
End Function