关于jmail看一下哪里有错we

[epowerlab]

关于jmail看一下有没有错
<%
'主程序开始、
'dim sql
'dim rs
dim content
'dim subject
email = request("email")
content = request("content")
'sql = "select * from company order by id desc"
'set rs = server.createobject("adodb.recordset")
'rs.open sql,conn,1,1
'do while not rs.eof
'email = rs("email")
Set JMail=Server.CreateObject("JMail.SMTPMail")
JMail.Logging=True
JMail.Charset="gb2312"
JMail.ContentType = "text/html"
JMail.ServerAddress="mail.xx.com"
JMail.Sender="[e-mail]"
JMail.Subject="测试了"
JMail.Body=content
JMail.AddRecipient email
JMail.Priority=3
JMail.Execute
Set JMail=nothing
'rs.movenext
'loop

response.write "<p align='center'>共有1封邮件发送成功.三秒种后系统将自动返回管理首页！</p>"
response.write "<meta http-equiv='refresh' content='3;URL=manage.asp'>"

'rs.close
'set rs = nothing
'conn.close
'set conn = nothing


%>

中国频道的空间是使用的jmail吧
xx便引去（