שלח תשובה

זירת השאלות

426
צפיות
9
תשובות

אובייקט ASPMail אינו עובד כראוי

,‏ 5 ביולי, 2005

כתבתי הקוד הבא וכשאני מנסה לשלוח אותו אני פשוט עובר לדף ריק ולא מקבל את ההודעה על שליחת ההודעה בהצלחה.
זה הקוד:


<%
DIM strAddressee, strName, strGarage, strEmail, strPhone, strTopic, strContent
strAddressee = request.form("addressee")
strName = request.form("name")
strGarage = request.form("garage")
strEmail = request.form("email")
strPhone = request.form("phone")
strTopic = request.form("topic")
strContent = request.form("content")

DIM Mailer
Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
Mailer.FromName = strName
Mailer.FromAddress= strEmail
Mailer.ReplyTo = strEmail
  Mailer.RemoteHost = "mail.Arie-Halafim.co.il"
  If strAddressee="Sales" then
    Mailer.AddRecipient "siteam@siteam.co.il", "Sales@Arie-Halafim.co.il"
  Else
    Mailer.AddRecipient "siteam@siteam.co.il", "Customer@Arie-Halafim.co.il"
  End If
Mailer.Subject = "strTopic"
Mailer.ContentType = "text/html"
Mailer.BodyText = "<html dir=rtl><body>שם:" & strName & "<br>מוסך:" & strGarage & "<br>אימייל:" & strEmail & "<br>טלפון:" & strPhone & "<br><br>נושא הפנייה:" & strTopic & "<br>תוכן הפנייה:" & strContent & "</body></html>"
‘Mailer.HTMLBody
Mailer.SendMail


IF Mailer.SendMail Then
  Response.Write "<html dir=’rtl’>"
  Response.Write "הודעתך נשלחה בהצלחה."
  Response.Write "<br><br>"
  Response.Write "<a href=’contact.html’>חזרה</a>"
  Response.Write "</html>"
End If

Set Mailer = Nothing
%>


מה לא תקין?

תגיות:

9 תשובות

  1. BINI הגיב:

    בעיה נוספת ושונה: קידוד אינו תואם
    בעת שאני מנסה להציג את מסד הנתונים – השורה העליונה של הטבלה (מסד הנתונים מוצג בטבלה) שבעצם מורכבת ממילים שמתארים את הערכים בעמודות, איננה מקודדת כמו הערכים עצמם. כך נוצר מצב בו אינני מצליח להציג את שניהם בעברית, תמיד אחד עברית והשני ג’יבריש ושיחקתי כבר עם כל הקידודים האפשריים…..(גם unicode).
    הקוד בתגובה הבאה (לא ניתן לשלוח יותר מ300 תוים).

  2. BINI הגיב:

    הקוד
    (עדיין ההודעה עוברת את 300 התוים אז העליתי הקובץ עצמו

  3. somebody הגיב:

    אני רק מתקן אותך..לא ניתן יותר מ…
    3000 תווים..
    לגבי השאלה הראשונה…
    נסה להוריד את ה :


    if Mailer.SendMail  then
    …..
    end if

    תכתוב ישר ההודעה נשלחה…
    כי אם היא לא תשלח אז תיהיה שגיאה וזה לא יראה ההודעה נשלחה.
    אני סתם מנחש מעלה רעיון…

  4. BINI הגיב:


    שיניתי מה שאמרת, אז עכשיו הדפדפן אמנם מראה את הכיתוב כי ההודעה נשלחה – אך בפועל אינני מקבל שום מייל…
    הקוד:


    <%
    DIM strAddressee, strName, strGarage, strEmail, strPhone, strTopic, strContent
    strAddressee = request.form("addressee")
    strName = request.form("name")
    strGarage = request.form("garage")
    strEmail = request.form("email")
    strPhone = request.form("phone")
    strTopic = request.form("topic")
    strContent = request.form("content")

    DIM Mailer
    Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
    Mailer.FromName = strName
    Mailer.FromAddress= strEmail
    Mailer.ReplyTo = strEmail
      Mailer.RemoteHost = "mail.Arieh-Halafim.co.il"
      If strAddressee="שיווק ומכירות" then
        Mailer.AddRecipient "מכירות", "Sales@Arieh-Halafim.co.il"
      Else
        Mailer.AddRecipient "שירות לקוחות", "Customer@Arieh-Halafim.co.il"
      End If
    Mailer.Subject = "strTopic"
    Mailer.ContentType = "text/html"
    Mailer.BodyText = "<html dir=rtl><body>שם:" & strName & "<br>מוסך:" & strGarage & "<br>אימייל:" & strEmail & "<br>טלפון:" & strPhone & "<br><br>נושא הפנייה:" & strTopic & "<br>תוכן הפנייה:" & strContent & "</body></html>"
    ‘Mailer.HTMLBody
    Mailer.SendMail

    Set Mailer = Nothing

    Response.Write "הודעתך נשלחה בהצלחה, תודה על פנייתך."
    %>

  5. BINI הגיב:


    הבעיה עם הASPMail תוקנה (פשוט משום מה אני לא מצליח לשלוח וכל שאר העולם כן מצליח…).
    מה שכן יש עדיין הבעיה עם הקידוד…

  6. יוסי ש הגיב:

    כמה דברים:
    ראשית התוכן שלך בעברית, מה זה:


    <meta http-equiv="Content-Language" content="en-us">

    שנית, את הנתונים שלך תכניס לתוך מערך באמצעות getrows()
    ושלישית, לא ראיתי שום דבר שם שמתייחס לאוביקט שליחת הדואר שלך

  7. BINI הגיב:

    זה פשוט הקידוד האחרון שניסיתי…
    לפני כן גם ניסיתי he וגם לא הלך אם לזה התכוונת.
    מזה בדיוק מערך getrows() ואיך הוא יעזור לי?
    ואת ההערה השלישית לא הבתי.

  8. יוסי ש הגיב:

    אממ..
    אני לא מכיר את האובייקט הזה אבל אני בטוח שיש לו הגדרת קידוד.
    אנא בדוק בתיעוד שלו.
    (אגב, אתה יכול לקרוא עליו כאן)

    לעניין הgetrows, אתה פשוט מכניס את הנתונים שלך לתוך מערך, סוגר את הconnection ואז אתה משוחרר לעשות על המערך כל פעלוה שתרצה.
    אפשר להתווכח מה יותר יעיל האם מערך או שימוש בgetString , בכל מקרה, אתה יכול לקרוא על זה פה , ועל אופן השימוש קרא במדריך.

שלח תשובה