大家帮我看下，我写的send mail代码有没有问题，在运行时，页面是不行的。
<%function SendMyMail(mailbody)
From = owner&"@
Reciever= tobe&"@
MailBody=MailBody & "@message='helleo," & Chr(13) & Chr(13)
MailBody=MailBody & "Please be informed that there is some barcode transfered to you,please visit htt://hzmot/m-track/transfer.asp to take some action"
MailBody=MailBody & Date() & Chr(13) & "'"
dim objSendMail
set objSendMail = CreateObject("JMail.SMTPMail")
objSendMail.silent = true
objSendMail.logging = true
objSendMail.ServerAddress= "hzexch01.
objSendMail.Sender= From
objSendMail.C
objSendMail.Subject="M-Track system information"
objSendMail.AddRecipient Reciever
objSendMail.Charset = "gb2312"
objSendMail.Body = MailBody
objSendMail.Priority=1
objSendMail.execute
set objSendMail = nothing
end function
%>
