asp发邮件ASP发送邮件

怎样用ASP发邮件？

asp是一种编程语言，不是软件。

发邮件得有邮件插件才行，就像上面说的GMAIL等。

而且你的服务器得支持才行，说句老实话，依楼主现在的水平搞起来比较麻烦，基本不可能。

ASP自动发邮件

首先服务器上要安装发送邮件的组件,如JMAIL 然后编写代码 <% Email = " test@ " ''收件人Email Set jmail = Server.CreateObject("JMAIL.Message") '建立发送邮件的对象 jmail.silent = false '屏蔽例外错误，返回FALSE跟TRUE两值 jmail.logging = true '启用邮件日志 jmail.Charset = "GB2312" '邮件的文字编码为国标 jmail.ContentType = "text/html" '邮件的格式为HTML格式 jmail.AddRecipient Email '邮件收件人的地址 jmail.From = " test@ " '发件人的E-MAIL地址 jmail.MailServerUserName = " test@ " '登录邮件服务器所需的用户名 jmail.MailServerPassword = "test" '登录邮件服务器所需的密码 jmail.Subject = "Jmail邮件" '邮件的标题 jmail.Body = "Jmail邮件测试" '邮件的内容 jmail.Priority = 1 '邮件的紧急程序，1 为最快，5 为最慢， 3 为默认值 jmail.Send("") '执行邮件发送（通过邮件服务器地址）。

请修改成你的邮件服务器SMTP地址 jmail.Close() '关闭对象 %>

asp发送简单的电子邮件

<% set jmail = server.CreateObject ("jmail.message") '创建对象 jmail.Silent = true '一般不用改 jmail.Charset = "gb2312" '信件的语言编码 jmail.ContentType = "text/html" '信件的格式html或纯文本 jmail.From = "xxlq123@" '发信人邮箱 jmail.FromName = "王大" '发信人姓名 jmail.Subject = "注册信息！" '信件主题 jmail.AddRecipient "" '收信人地址 jmail.Body = "恭喜您在赛友在线注册成功！" '信件正文 jmail.MailServerUserName = "xxlq123" '服务器登陆用户名(您的邮件地址) jmail.MailServerPassWord = "123" '服务器登陆密码(您的邮件密码) jmail.Send("") '服务器地址 jmail.Close set jmail = nothing %> 经过测试 绝对可以！

ASP发送邮件

N年前刚学ASP时整理的东东，希望现在还没过时吧。

自己好像都还没用过，当时几乎是一句一句地解释过来的，呵～ '============================================================= '邮件发送程序SendJMail(subject,mailaddress,email,sender,content,Filename,fromer) '============================================================= <% '参数说明 'Subject : 邮件标题 'MailAddress : 发件服务器的地址,如 'Email : 收件人邮件地址 'Sender : 发件人姓名 'Content : 邮件内容 'Filename : 附件地址 'Fromer : 发件人的邮件地址 Sub SendJMail(subject, mailaddress, email, sender, content, fromer) Set jmail = Server.CreateObject("JMAIL.SMTPMail") '创建一个JMAIL对象 jmail.silent = true 'JMAIL不会抛出例外错误，返回的值为FALSE跟TRUE jmail.logging = true '启用使用日志 jmail.Charset = "GB2312" '邮件文字的代码为简体中文 jmail.ContentType = "text/html" '邮件的格式为HTML的 jmail.ServerAddress = mailaddress '发送邮件的服务器 jmail.AddRecipient Email '邮件的收件人 jmail.SenderName = sender '邮件发送者的姓名 jmail.Sender = fromer '邮件发送者的邮件地址 jmail.Priority = 1 '邮件的紧急程序，1 为最快，5 为最慢， 3 为默认值 jmail.Subject = subject '邮件的标题 jmail.Body = content '邮件的内容 '由于没有用到密抄跟抄送，这里屏蔽掉这两句，如果您有需要的话，可以在这里恢复 'jmail.AddRecipientBCC Email '密件收件人的地址 'jmail.AddRecipientCC Email '邮件抄送者的地址 JMail.AddAttachment Filename '发送附件 jmail.Execute() '执行邮件发送 jmail.Close '关闭邮件对象 'set jmail=Nothing '自己添上的,应该有这个命令. End Sub '调用此Sub的例子 'Dim strSubject,strEmail,strMailAdress,strSender,strContent,strFromer 'strSubject = "这是一封用JMAIL发送的测试邮件" 'strContent = "JMail组件发送测试成功！" 'strEmail = "runbing@" 'strFromer = "runbing@" 'strMailAddress = "" 'Call SendMail (strSubject,strMailaddress,strEmail,strSender,strContent,strFromer) %>