ASP 发送邮件乱码解决

最新推荐文章于 2018-01-04 20:42:38 发布

大写的A

最新推荐文章于 2018-01-04 20:42:38 发布

阅读量2.5k

点赞数

分类专栏： .NET 文章标签： asp 邮件乱码邮件服务器 asp.net

本文链接：https://blog.csdn.net/lvbian/article/details/10517737

版权

.NET 专栏收录该内容

15 篇文章 1 订阅

订阅专栏

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<html>	
	<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
</head>
<body>
<%
	Dim username,email,tel,content
	 username=request.form("name")
	 email=request.form("email")
	 tel=request.form("tel")
	 content=request.form("content")
	set msg = Server.CreateOBject( "JMail.Message" )
	msg.ISOEncodeHeaders = false 	
	msg.Logging = true
	msg.silent = true
	msg.CharSet="utf-8"
	msg.ContentType="text/html"
	msg.From = "test@163.com"
	msg.FromName = "from internet"		
	msg.AddRecipient "test@begonia-capital.com", "info"
	msg.Subject = "来自互联网用户建议"
	msg.Body =  "姓名:" & username & "<br>" &	 "邮箱:" & email & "<br>" &	 "联系方式:" & tel & "<br>" &	 "意见建议:" & content & "<br>"
	msg.MailServerUserName = "test@163.com" '登录邮件服务器所需的用户名
	msg.MailServerPassword = "password"	
	if not msg.Send( "smtp.163.com" ) then
		Response.write "<scrpit><pre>alert('发送失败,稍后重试!');location.href='/';</pre></scrpit>"	
	else
		Response.write "提交成功!"&"<br>"	
		Response.write "<a href='index.html'>返回首页</a>"
	end if

%>
</body>
</html>

造成邮件发送乱码或者页面显示乱码有多种情况,要确保文件自身编码,jmail编码,和html head标签中的 charset编码一致. 也要将jmail的msg.ISOEncodeHeaders = false;防止jmail内部自动编码造成影响.