שלח תשובה

זירת השאלות

628
צפיות
10
תשובות

בעייה ב-CDO!!!

,‏ 12 בדצמבר, 2003

מצאתי שרת שעובד עם רכיב ה-CDO של ASP (וואבסמבה)
אבל יש לי בעיית עברית בנושא ההודעה!!!
הכנסתי את הקוד של עברית לוגית


<%@ codepage=1255 %>


הכנסתי את הקוד של העברית לוגית ב-HTML
הכנסתי את הקוד הנוסף של אובייקט רספונס


<% response.chares=1255 %>

ועדיין זה נותן לי סימני שאלה בנושא ההודעה!!!

למישהו יש פיתרון בשבילי???

תודה לכל מי שמגיב!!!

תגיות:

10 תשובות

  1. נסה


    objMail.SetLocaleIDs(1255) ' send Logical Hebrew by mail

  2. ניר טייב הגיב:

    תודה רבה!!! אבל!!!
    זה לא עובד הרכיב לא תומך באפשרות זו!!!
    אני עובד על CDO של 2000 ו-XP ולא על זה של NT
    אולי למישהו יש פיתרו אחר בשבילי???

  3. ניר טייב הגיב:

    טוב תודה בכל מקרה אבל
    סידרתי לי את זה כך שהנושא יכנס בגוף ההודעה!!!
    אבל עכשיו יש לי בעייה אחרת!!! ניסיתי להכניס כך שהם מכניסים קישור!!!
    אתם יכולים לראות דוגמא כאן!!
    אבל זה מגיע לאי-מייל שלי זה לא עושה לי את הקישור טוב!!!
    והנה הקוד של השליחת אי-מייל שבו הקישורים לא עובדים!!!


    <%
    dim body
    body = "<div align='right'><font face='" & request.Form("font") &"' color='"& request.form("color") & "' style='font-size:"& request.Form("size") & "'>"
    body = body & "<u>" & server.HTMLEncode("נושא: ") & server.HTMLEncode(Request.Form("subject")) & "</u><br>"
    body = body & server.HTMLEncode("שם: ") & server.HTMLEncode(Request.Form("name")) & "<br><br><br>"
    body = body & server.HTMLEncode(request.Form("message")) & "<br><br><br>"
    if request.Form("img") <> "http://&quot; then
    body = body & "<img src='" & request.Form("img") & "' border='0'></div>"
    End IF
    for i=1 to 3
    if request.Form("link" & i) <> "http://&quot; then
    body = body & "<a href='" & request.Form("link" & i) & "'>"
    body = body & request.Form("Dlink" & i) & "</a>"
    end IF
    next
    body = body & "</div>"
    response.Charset=1255
    If Request.Form("btnSend").Count > 0 Then

    Set objMessage = CreateObject("CDO.Message")
    objMessage.Subject = Request.Form("From")
    objMessage.Sender = Request.Form("From")
    objMessage.To = "[email protected]"
    objMessage.HtmlBody = body
    objMessage.Configuration.Fields.Item _
    ("http://schemas.microsoft.com/cdo/configuration/sendusing&quot😉 = 2
    objMessage.Configuration.Fields.Item _
    ("http://schemas.microsoft.com/cdo/configuration/smtpserver&quot😉 = "mail.speedy.co.il"
    objMessage.Configuration.Fields.Item _
    ("http://schemas.microsoft.com/cdo/configuration/smtpserverport&quot😉 = 25
    objMessage.Configuration.Fields.Update
    objMessage.Send
    session("Email") = "האי-מייל נשלח בהצלחה"
    session.CodePage = 1255
    Response.Redirect("Sent.html")
    End If
    %>

    והנה הקוד של הכנסת הקישור לגוף ההודעה!!! (מתוך הקוד הקודם)


    for i=1 to 3
    if request.Form("link" & i) <> "http://&quot; then
    body = body & "<a href='" & request.Form("link" & i) & "'>"
    body = body & request.Form("Dlink" & i) & "</a>"
    end IF
    next

    השתמשתי בלולאה כי יש לי 3 תאי קישורים!!!

  4. etubi הגיב:

    מה ניסת לעשות כאן?
    for i=1 to 3
    if request.Form("link" & i) <> "http://&quot; then
    body = body & "<a href='" & request.Form("link" & i) & "'>"
    body = body & request.Form("Dlink" & i) & "</a>"
    end IF
    next
    השורה הזאת לא אפשרית!
    request.Form("link" & i)
    תנסה משהו אחר..

  5. ניר טייב הגיב:

    אופס
    זה היה אמור להיות להודעה של תהפריט!!!
    אז איך אני מסדר את זה!!! שזה יעבוד לי בלולאה!!!

  6. תגיד… מה היה קורה אילו…
    היית מפחית במספר הסימני קריאה שלך ב… נגיד… 10 סימני קריאה פחות לשאלה. מה היה קורה?

    זה!!! לא!!! נראה!!! טוב!!! כל!!! הסימני!!! קריאה!!! האלה!!!

    זה!!! נותן!!! הרגשה!!! כאילו!!! אתה!!! לא!!! מפסיק!!! לצעוק!!!!!!

    נכון?!?!?!?!?!

    תודה

  7. etubi הגיב:

    צודק!!!
    כדי!! שתוריד !!! קצת!! סימני!!! קראיה!!!
    פשוט תוריד את הI שרשום שם…
    וזהו

שלח תשובה