王子文身高是多少:邮箱为什么收到的是乱码

来源:百度文库 编辑:中科新闻网 时间:2024/05/05 23:45:51
这是代码:
第一部分
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>发送email</title>
<link href="../style.css" rel="stylesheet" type="text/css">
</head>
<body>
<form method="POST" action="email.asp" name="email" >
<table align="center">
<tr><td>你的信箱:</td><td><input type="text" name="emailbox" size="30"></td></tr>
<tr><td>主 题:</td><td><input type="text" name="subject" size="30"></td></tr>
<tr><td>你要说的话:</td><td><textarea rows="10" name="body" cols="29">
第二部分
<% emailbox=trim(request("emailbox"))
subject=trim(request("subject"))
body=trim(request("body"))
smail=trim(request("smail"))

if emailbox="" then
response.end
end if
if instr(emailbox,"@")=0 or instr(emailbox,".")=0 then
response.end
end if

if subject="" then
response.end
end if

if body="" then
response.end
end if

Set msg = Server.Createobject("Jmail.message")
msg.silent = true
msg.Logging = true
msg.Charset = "gb2312"
msg.contentType = "text/html"
msg.From =emailbox
msg.AddRecipient smail
msg.Subject =subject
msg.Body =body
msg.send ("mail.043500.com")
set msg = nothing
if err then
SendMail=err.description
err.clear
else
SendMail="OK"
end if
if SendMail="OK" then
response.write("<script language=javascript>alert('您的留言信息已经发送到我们的客服邮箱,我们将在一个工作日内给您答复!');window.location= '../index.asp'</script>")
else
response.write("<script language=javascript>alert('由于系统错误,邮件未能成功发送');window.location='../index.asp'</script>")
end if
%>
比如是126邮箱,邮箱是wangfuqiang800@126.com大家写下代码!

是邮箱不支持吧。