asp表单提交到邮箱乱码问题

<%@ Language = VBScript %>
<%
action=request("action")
if action="ok" then
'==================================================
' 参数设置开始，请修改相应参数
smtpserver = "smtp. '发送邮件所使用的SMTP服务器，例如smtp.，请修改
smtpuser = "" '与SMTP服务器对应的邮箱用户名，请修改
smtppwd = "" '与SMTP服务器对应的邮箱密码，请修改
'如果SMTP服务器需要发信认证，则设置登录SMTP服务器的用户名和密码
'与相应SMTP服务器对应的邮件地址
'注意：很多SMTP服务器除了要验证用户名和密码外，还要验证发件人地
'址，比如的SMTP服务器在检查发信人邮件地址是不是以
'结尾，否则不予发送，因此，使用相应的信箱做为发信人信箱是必要的
smtpemail = ""  'SMTP服务器发信邮箱，请修改
myemail="" '用来接收邮件的邮箱，请修改,可以与SMTP服务器发信邮箱不同
' 参数设置结束
'==================================================
sendname = trim(Request("name")) '发件人名字
email = trim(Request("email")) '发件人邮箱
CompanyName = trim(Request("CompanyName"))
address = trim(Request("address"))
fax = trim(Request("fax"))
telephone = trim(Request("telephone"))
body = trim(Request("body"))
guojia = trim(Request("guojia"))
select1 = trim(Request("select"))
textfield = trim(Request("textfield"))
select22 = trim(Request("select2"))
if sendname="" or email="" or CompanyName="" or guojia=""  or select22="" then
response.write "Items with asterisks(*) must be filled! <a href=javascript:history.go(-1)>Return</a>"
response.end
end if
mailbody=mailbody &"<style>A:visited {    TEXT-DECORATION: none    }"
    mailbody=mailbody &"A:active  {    TEXT-DECORATION: none    }"
    mailbody=mailbody &"A:hover   {    TEXT-DECORATION: underline    }"
    mailbody=mailbody &"A:link       {    text-decoration: none;}"
    mailbody=mailbody &"BODY   {    FONT-FAMILY: Arial, Helvetica, sans-serif; FONT-SIZE: 12pt;}"
    mailbody=mailbody &"TD       {    FONT-FAMILY: Arial, Helvetica, sans-serif; FONT-SIZE: 12pt    }</style>"
    mailbody=mailbody &"<TABLE border=0 width='95%' align=center><TBODY><TR><TD>"
    mailbody=mailbody &"HELLO! I'm: "&sendname&"<br>"
    mailbody=mailbody &""&select22&"<br><br>"
    mailbody=mailbody &"Country: "&guojia&"<br><br>"
    mailbody=mailbody &"Contact: "&CompanyName&"<br><br>"
    mailbody=mailbody &"Address: "&address&"<br><br>"
    mailbody=mailbody &"Phone: "&telephone&"<br><br>"
    mailbody=mailbody &"Fax: "&fax&"<br><br>"
    mailbody=mailbody &"E-mail: "&email&"<br><br>"
    mailbody=mailbody &"How did you hear of EEMB: "&select1&"<br>"
    mailbody=mailbody &""&textfield&"<br><br>"
    mailbody=mailbody &"Message: "&body&"<br><br>"
    mailbody=mailbody &"*************************************************************************************"
    mailbody=mailbody &"<br>此邮件由<a href=http:// target=_blank>EEMB</a>在线邮件系统发送，请勿直接回复此邮件！<br>"
    mailbody=mailbody &"该邮件的发件人为"&sendname&"&nbsp;&nbsp;发件人邮箱为"&email&"<br>"
    mailbody=mailbody &"如果需要回复，请发邮件至"&email&"，谢谢！ <br>"
    mailbody=mailbody &"*************************************************************************************"   
    mailbody=mailbody &"</TD></TR></TBODY></TABLE>"
if sendname <> "" and email <> "" then

set jmail= server.CreateObject ("jmail.message")
jmail.Silent = true
jmail.Charset = "gb2312"
JMail.ContentType = "text/html"

jmail.From = smtpemail
jmail.FromName = sendname
jmail.ReplyTo = email
jmail.Subject = CompanyName
jmail.AddRecipient myemail
jmail.Body = mailbody
jmail.MailServerUserName = smtpuser
jmail.MailServerPassWord = smtppwd

isgo = jmail.Send(smtpserver)
if isgo then
msg=" "
else
msg = " "
end if

jmail.Close
set jmail = nothing
end if
end if
%>


<%if msg<>"" then%>
<br><%=msg%><span class="STYLE24"><span class="STYLE40">Sent successfully!<img src="imagess/gou.jpg" width="23" height="24" vspace="5">Thank you for contacting EEMB BATTERY through our contact form.  You should receive a response within 24 hours, excluding weekends.</span><a href="javascript:history.go(-1)"><strong><em>Return</em></strong></a></span>
<%else%>
<form action="contactus.asp" method=post>
  <table cellpadding="2" cellspacing="1" width="668">
  <input type="hidden" name="action" value="ok">
   <tr>
      <td width="134" class=forumrow STYLE24><span class="STYLE5">Contact</span><font color=#ff0000>*</font></td>
      <td width="453" colspan="3" class=forumrow><select name="select2">
        <option>Mr</option>
        <option>Ms</option>
      </select>
      <input name=name type=text id="name" size=24>
        <label></label>
        </span></td>
    </tr>
    <tr>
      <td width="134" class=forumrow STYLE24><span class="STYLE5">Country</span><font color=#ff0000>*</font></td>
      <td colspan="3" class=forumrow><input type=text name=guojia size=30></td>
    </tr>
        <tr>
      <td width="134" class=forumrow STYLE24><span class="STYLE5">The company name</span><font color=#ff0000>*</font></td>
      <td colspan="3" class=forumrow><input type=text name=CompanyName size=30></td>
    </tr>
            <tr>
      <td width="134" class=forumrow STYLE24>Address</td>
      <td colspan="3" class=forumrow><input type=text name=address size=30></td>
    </tr>
            <tr>
      <td width="134" class=forumrow STYLE24>Phone</td>
      <td colspan="3" class=forumrow><input type=text name=telephone size=30></td>
    </tr>
            <tr>
      <td width="134" class=forumrow STYLE24>Fax</td>
      <td colspan="3" class=forumrow><input type=text name=fax size=30></td>
    </tr>
    <tr>
      <td width="134" class=forumrow STYLE24><span class="STYLE5">E-mail</span><font color=#ff0000>*</font></td>
      <td colspan="3" class=forumrow><input name=email type=text id="email" size=30></td>
    </tr>
    <tr>
      <td width="134" class=forumrow STYLE24>How did you hear of EEMB<span class="STYLE6">*</span></td>
      <td colspan="3" class=forumrow><select name="select">
                                      <option selected="selected">---Please select---</option>
                                      <option>Google Search</option>
                                      <option>Google Sponsored Links</option>
                                      <option>Globlespec</option>
                                      <option>Sourceguide</option>
                                      <option>Interfacebus</option>
                                      <option>Alibaba</option>
                                      <option>Globalsource</option>
                                      <option>Yahoo</option>
                                      <option>Others (Please specify)</option>
                                    </select>
                                    <label>
                                    <input type="text" name="textfield">
                                    </label>&nbsp;</td>
    </tr>
    <tr>
      <td width="134" class=forumrow STYLE24>Message</td>
      <td colspan="3" class=forumrow><textarea name="body" cols=50 rows=6 id="body"></textarea></td>
    </tr>
    <tr>
      <td width="134" class=forumrow></td>
      <td height=20 colspan="3" class=forumrow>
        <input type="Submit" value="Submit information" name="Submit">
&nbsp;
        <input type="reset" name="Clear" value="Empty"><br>
        <span class="STYLE24">Items with asterisks(<span class="STYLE6">*</span>) must be filled! </span></td>
    </tr>
  </table>
</form><%end if%>