设置Mail = CreateObject("CDO.Message")不起作用 [英] Set Mail = CreateObject(“CDO.Message”) not woking
本文介绍了设置Mail = CreateObject("CDO.Message")不起作用的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!
问题描述
过去,我的电子邮件表单正常工作,但是从今天开始,提交表单且未发送电子邮件后,将显示此错误消息:
My email form worked correctly in the past, but starting of today this error message is displayed after the form is submitted and no email is sent:
error ''80070008''
/ho/ewdisp000.asp, line 378
消息的发送方式如下:
This is how the messages were sent:
<%
Set Mail = CreateObject("CDO.Message") // line 378
Mail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
Mail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") ="smtp.gmail.com"
Mail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 465
Mail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = 1
Mail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
Mail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
Mail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername") ="xxx@domain.com"
Mail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendpassword") ="password"
Mail.Configuration.Fields.Update
Mail.Subject= "Subject"
Mail.From="xxx@domain.com"
Mail.To="xxx@domain.com"
Mail.TextBody="Thank you for your feedback"
Mail.Send
Set Mail = Nothing
%>
推荐答案
参考- ^ ].
它可能会帮助您. :)
Refer- Windows Update error 80070008 or 8007000e[^].
It might help you. :)
这篇关于设置Mail = CreateObject("CDO.Message")不起作用的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!
查看全文