23rd
2008,04
Jmail发送邮件实例
今天帮阿文做了个发送邮件的页面.就是在网页中填写表单后发送到指定邮箱.看下面代码.
表单页面我就不贴出来了.下面代码是处理表单数据与发送邮件.
- email.asp-处理数据部分
- sex = Request.Form("sex") '没有用到任何安全过滤函数.因为是发送到邮箱.
- Contact = Request.Form("contact")
- Email = Request.Form("email")
- Message = Request.Form("message")
- Str = "<div style=""height:22px; font-size:12px;"">Sex:" & sex & "</div>"
- Str = Str & "<div style=""height:22px; font-size:12px;"">Contact Number:" & contact & "</div>"
- Str = Str & "<div style=""height:22px; font-size:12px;"">Email:" & email & "</div>"
- Str = Str & "<div style=""height:22px; font-size:12px; padding:5px 0;"">Message:" & message & "</div>"
- email.asp-发送数据到邮箱部分
- Set jmail = Server.CreateObject("JMAIL.Message") '建立发送邮件的对象
- jmail.silent = true '屏蔽例外错误,返回FALSE跟TRUE两值j
- jmail.logging = true '启用邮件日志
- jmail.Charset = "utf-8" '邮件的文字编码为国标
- jmail.ContentType = "text/html" '邮件的格式为HTML格式
- jmail.AddRecipient ("******@qq.com") '邮件收件人的地址
- jmail.From = "******@163.com" '发件人的E-MAIL地址
- jmail.MailServerUserName = "******" '登录邮件服务器所需的用户名
- jmail.MailServerPassword = "******" '登录邮件服务器所需的密码
- jmail.Subject ="邮件的标题" '邮件的标题
- jmail.Body = Str '邮件的内容
- jmail.Send("smtp.163.com") '执行邮件发送(通过邮件服务器地址)
- jmail.Close() '关闭对象
发送完邮件后对这个空白页面怎么处理尼?
- 处理发送邮件页面部分
- <script type="text/javascript">
- alert("发送成功!");
- location.href('message.asp') //跳转页面
- window.opener=null;window.close(); //关闭页面.怎么处理还是看你自己所要的.
- </script>
Name: Cngothic 
































Leave a reply?