UC知道ASP中如何实现自动发邮件功能
来源：百度知道 编辑：UC知道 时间：2024/05/14 13:16:48
具体的代码如下
<%
Set msg = Server.CreateObject("JMail.Message")
msg.silent = true
msg.Logging = true
msg.Charset = "gb2312"
msg.MailServerUserName = "wangqin1234577" '此为您邮箱的登录帐号，使用时请更改为自己的邮箱登录帐号
msg.MailServerPassword = "19870212" '此为您邮箱的登录密码，使用时请更改为自己的邮箱登录密码
msg.From = "wangqin1234577@126.com" '发件人Email
msg.FromName = "我是谁" '发件人姓名
msg.AddRecipient "56469038@qq.com" '收件人Email
msg.Subject = "Jmail发送测试" '邮件主题
msg.Body = "这是由Jmail组件发送的邮件！" '邮件正文
msg.Send ("mail.126.com") 'SMTP服务器地址
msg.close()
set msg = nothing
%>
我运行是显示完成了,Jmail组件我也安装了,可是就是收不到邮件啊,为什么?哪个高手帮帮忙啊!
<%
Set msg = Server.CreateObject("JMail.Message")
msg.silent = true
msg.Logging = true
msg.Charset = "gb2312"
msg.MailServerUserName = "wangqin1234577" '此为您邮箱的登录帐号，使用时请更改为自己的邮箱登录帐号
msg.MailServerPassword = "19870212" '此为您邮箱的登录密码，使用时请更改为自己的邮箱登录密码
msg.From = "wangqin1234577@126.com" '发件人Email
msg.FromName = "我是谁" '发件人姓名
msg.AddRecipient "56469038@qq.com" '收件人Email
msg.Subject = "Jmail发送测试" '邮件主题
msg.Body = "这是由Jmail组件发送的邮件！" '邮件正文
msg.Send ("mail.126.com") 'SMTP服务器地址
msg.close()
set msg = nothing
%>
我运行是显示完成了,Jmail组件我也安装了,可是就是收不到邮件啊,为什么?哪个高手帮帮忙啊!
首先确认你的服务器中是否支持jmail组件功能.
当然其它的在线发邮件组件也可以.
然后搜索一段JMAIL在线发送邮件功能的代码,网上有很多的,设置好你的服务器和其它的参数,就可以在线发邮件了.