我是初学者，问题也很初级~~~

[Mictel]

<%
Dim JMail
Set JMail = Server.CreateObject("JMail.Message")

smtpserver = "xxxxxxxxxxxx"
smtpuser = "xxxxxx"
smtppwd = "xxxxxx"

Jmail.Silent = true
JMail.Charset = "gb2312"
JMail.Logging = true
JMail.Priority = 3

JMail.From = "[e-mail]"
JMail.FromName = "mictel"
Jmail.ReplyTo ="[e-mail]"

JMail.AddRecipient("[e-mail]")

JMail.Subject = "Test for JMail"& vbcrlf & vbcrlf & tbody
JMail.Body = "提交成功！谢谢你的支持。"

Jmail.MailServerUserName = smtpuser
Jmail.MailServerPassWord = smtppwd

Jmail.Send(smtpserver)
isgo = Jmail.Send(smtpserver)
if isgo then
RESPONSE.WRITE("提交成功！谢谢你的支持。")
RESPONSE.WRITE(JMail.log)
else
RESPONSE.WRITE(JMail.log)
end if

JMail.Close()
Set JMail = Nothing
%>


为什么以上代码,[e-mail]受到两遍邮件?
如何解决?
谢谢~~~~

[bluesky1314520]

Jmail.Send(smtpserver)
isgo = Jmail.Send(smtpserver)
Jmail.Send(smtpserver) 只留下一个就够了！

[Mictel]

谢谢~~