PDA

View Full Version : JMail



پرنده کوچک
چهارشنبه 28 مرداد 1383, 16:26 عصر
سلام.
من کد زیر را نوشته ام و ایراد زیر را داده است. دلیلش چیست ؟
در ضمن آدرس ها در اینجا فرضی است . (نه در کد اصلی) فرض کنید آدرس سایتم www.my.com و آدرس سایت host ام www.another.com باشد. در ضمن JMail را ساپورت میکنند.
قطعه کد :


Dim objJMail
Set objJMail = Server.CreateObject("JMail.SMTPMail")
objJMail.ServerAddress = "mail.another.com:25"
objJMail.Sender = "info@my.com"
objJMail.AddRecipient "info@my.com"
objJMail.Subject = "Register"
objJMail.Body = Request("FName") & " " & Request("LName") & " " & Request("Phone") & " ** " & Request("Terms")
objJMail.Priority = 1
Dim bSuccess
bSuccess = objJMail.Execute()
If bSuccess = False Then%>
<h3><font color="red">متاسفانه ثبت نام موفقیت آمیز نبود ، لطفا دوباره تلاش کنید. </font></h3>
<% Else%>
<h3>اطلاعات شما با موفقیت ارسال شد ، منتظر تماس ما ظرف چند روز آینده باشید. </h3>
<%
End If
objJMail = close()
Set objJMail = Nothing

و خطا :


jmail.SMTPMail error '8000ffff'

The message was undeliverable. All servers failed to receive the message

/Content/act/register.asp, line 34