看看我的程序有什么毛病

[ying1234]

sub send_mail()
dim JMail
set JMail=server.createobject("JMail.SMTPMail")
JMail.logging=true
JMail.serverAddress="www.yahoo.com.cn"
JMail.sender="[e-mail]"
JMail.subject="hello!"
JMail.AddRecipient "[e-mail]"
JMail.AddRecipient "[e-mail]"
JMail.body="......"
JMail.priority=3
set JMail=nothing
end sub
这是我一个注册系统中的一段程序，运行时老出错，我肯定别的程序没问题。就是这个程序出了问题，大家看看毛病在哪？

[lzt_6666]

在jmail.priority=3后面加一句发送语句jmail.execute

[ying1234]

加了还是有毛病，我怀疑是不是JMail控件出问题了。

[wsqsoft]

JMail.serverAddress="www.yahoo.com.cn"
这个能是邮件服务器吗？

[ying1234]

那么yahoo的邮件服务器是什么？还有我的电脑不能上网，怎么样才能验证我的邮件程序是没问题的呢？

[fuyungril]

JMail这个控件注册了吗？没有注册的话注册试一试

[ying1234]

fuyungril(梦想中的女孩)
是注册了，还是不行。