一聚教程网:一个值得你收藏的教程网站

最新下载

热门教程

asp 发送邮件代码,支持外国主机

时间:2022-06-30 11:32:38 编辑:袖梨 来源:一聚教程网

<%
sendUrl="http://schemas.microsoft.com/cdo/configuration/sendusing"
smtpUrl="http://schemas.microsoft.com/cdo/configuration/smtpserver"


' Set the mail server configuration
Set objConfig=CreateObject("CDO.Configuration")
objConfig.Fields.Item(sendUrl)=2 ' cdoSendUsingPort
objConfig.Fields.Item(smtpUrl)="relay-hosting.secureserver.net"
objConfig.Fields.Update


' Create and send the mail
Set objMail=CreateObject("CDO.Message")
' Use the config object created above
Set objMail.Configuration=objConfig
objMail.From="[email protected]"
objMail.ReplyTo="[email protected]"
objMail.To="[email protected]"
objMail.Subject="subject"
objMail.TextBody="body"
objMail.Send
%>

热门栏目