אממ יש לי שתי שאלות קטנות..

עברתי על המאמר תגיד לי אם זה אמור
להיות ככה..

body = Replace(body,chr(13),"<br>")

האם זה נכון לרשום את זה ככה?

תוכל להגיד לי לאיפה אני צריך להכניס
את השורה הזאת בקוד שלי?

response.write"<tr>" & VbLf
            response.write"<td bgcolor=white align=center>כותרת:</td>" & VbLf            
            response.write"</tr>" & VbLf
            response.write"<tr>" & VbLf
            response.write"<td bgcolor=blue align=center>" & replyrs.fields("title") & "</td>" & VbLf            
            response.write"</tr>" & VbLf
            response.write"<tr>" & VbLf
            response.write"<td bgcolor=white align=center>תוכן ההודעה</td>" & VbLf            
            response.write"</tr>" & VbLf
            response.write"<tr>" & VbLf
            response.write"<td bgcolor=blue align=center>" & replyrs.fields("body") & "</td>" & VbLf            
            response.write"</tr>" & VbLf
            replyrs.movenext()          
                       Wend
    
    response.write"</table>" & VbLf

%>

הוא רושם לי הודעת שגיאה


error '80020009'
Exception occurred.

/zombie123/forum/view_topic.asp, line 42

42 זאת השורה שאמרת לי להחליף..

לא הבנתי אותך מזתומרת לבדוק?

למה מה עשיתי עכשיו?

דרך אגב
תודה ניר על ההסבר עכשיו אני בערך הבנתי את זה..

זה רושם לי שגיאה..


Microsoft VBScript runtime error '800a000d'
Type mismatch

/zombie123/forum/view_topic.asp, line 42

בבקשה משהו…

רשמתי ככה
וזה עדיין לא נכון..

if Len(replyrs.fields("body"))=0 then
        nada="אין תוכן להודעה הזאת"
        else
        response.write"<tr>"
        response.write"<td bgcolor=blue align=center>" & Replace(replyrs.fields("body"),chr(13),"<br>") & "</td>" & vblf  
        response.write"</tr>"
        end if

השגיאה

Microsoft VBScript runtime error '800a000d'
Type mismatch

/zombie123/forum/view_topic.asp, line 41

שורה 41

if Len(replyrs.fields("body"))=0 then

תודה מראש

הנה


response.write"<tr>"
            response.write"<td bgcolor=white align=center>תוכן ההודעה</td>" & vblf
        response.write"</tr>"
        if Len(replyrs.fields("body"))=0 then
        nada="אין תוכן להודעה הזאת"
        else
        response.write"<tr>"
        response.write"<td bgcolor=blue align=center>" & Replace(replyrs.fields("body"),chr(13),"<br>") & "</td>" & vblf  
        response.write"</tr>"
        end if
        while not replyrs.EOF
            response.write"<tr>" & VbLf
            response.write"<td bgcolor=white align=center>כותרת:</td>" & VbLf            
            response.write"</tr>" & VbLf

כל מה שרשמתי בעיברית זה שנה למספרים

יש לי עוד שאלה קטנה
איך אני יכול לתת פקודה שתספור כמה הודעות וכמה תגובות יש בפורום מסוים?
תודה מראש

ניר תשמע שניה
אני עושה פורום טבלאות אז איך אני יכול להכניס את הנתונים לטבלה ?

משהו יכול להגיד לי מה לא בסדר
בשאילתה שלי?

con.execute "insert into register(username,[password],fname,lname,icq,messanger,email,icon,hatima) values('" & username & "','" & password & "','" & fname & "','" & lname & "','" & icq & "','" & messanger & "','" & email & "','" & icon & "','" & hatima & "',)"

השגיאה היא

Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Syntax error in INSERT INTO statement.

/zombie123/tforum/register.asp, line 29

תודה.!!

אני ירשום את זה יותר ברור
אני עשיתי בטופס הרשמה שיכניסו את הכתובת של החתימה עכשיו אני רוצה בדף שמציג את ההודעה שיציג את התמונה שהוא שם..
תודה מראש…!…

נגיד
שהוא העלה את החתימה שלו לאיזה שרת ורושם את הכתובת שלה נגיד:
http://www.host.com/icon.jpg

בבקשה משהו

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

<textarea name="body" style="border: 1px solid #000000" rows="10" cols="50"
id=t1></textarea><br>

<script language="JavaScript">
function addTextToInput(obj,textAdd)
{
var objElement = document.getElementById(obj);
objElement.focus();
document.selection.createRange().text = textAdd;
}
</script>
הסופת סמיילים:
<img src=020.gif onclick="addTextToInput('t1','[:)]')">

וזה הקוד בעמוד שמציג את ההודעה

function msgEdit(str)
str = replace(str,"[(:-$]","<img src=""angry.gif"">")
msgEdit = str
end function

ושמתי את זה בתא של התוכן הודעה

msgEdit(body)

אני מקווה שעכשיו זה בסדר ולא תמחק תהודעה שלי

אופס תיקון לקוד שמציג את ההודעה


function msgEdit(str)
    str = replace(str,"[:)]","<img src=""020.gif"">")
    msgEdit = str
    end function

אוריקס אתה יכול בבקשה
למחוק את ההודעה הזאת?

תודהר

דרך אגב הבעיה היא שזה מציג לי את
הקוד של הסמיילי ולא הת הסמיילי עצמו דרך אגב תיקון לקוד שרשמתי בהודעה השניה לקוד שמציג את ההודעה

function msgEdit(str)
    str = replace(str,"[:)]","<img src=""020.gif"">")
    msgEdit = str
    end function