שלח תשובה

זירת השאלות

662
צפיות
1
תשובות

בעיה בRecordset ואני חושב שבכלל גם

,‏ 7 ביוני, 2008

הנה האתר ובו רשומה התקלה:
http://users4.nofeehost.com/shillo/shillo/getmessages.asp
והנה הקוד:



<!– #INCLUDE FILE="msgform.asp" –>
<%
s=Request.Form("msgsubject")
b=Request.Form("msgbody")
a=Request.Form("author")
set conn = Server.CreateObject("ADODB.Connection")
conn.Open"Provider=Microsoft.Jet.OLEDB.4.0;Data source ="&Server.MapPath("db/myData.mdb")
set rec = Server.CreateObject("ADODB.Recordset")
mySQL="select * from members"
rec.Open mySQL, conn,3,3
rec.addNew
rec.fields("MsgSubject").value=s
rec.fields("Author").value=a
rec.fields("MsgBody").value=b
%>
<table>
<tr>
<td><% Response.Write(s) %></td>
</tr>
<tr>
<td><% Response.Write(a) %></td>
</tr>
<tr>
<td><% Response.Write(b) %></td>
</tr>
</table>
<%
rec.close
set rec = nothing
conn.close
set conn=nothing
%>


</body>
</html>

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

תגיות:

1 תשובות

  1. BuildHome הגיב:

    תשובה
    זה קצת מוזר.
    קודם כל, לא ממליץ לך להשתמש עם RS ובמיוחד לא עם 3,3 שזה לא יעיל.

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

    ממליץ לך לשים את כל חלק הקוד על הוספת הנתונים תחת משפט תנאי שבודק אם בכלל יש מה להוסיף (כלומר: האם שלחת טופס עם נתונים).

    אתה חייב לשים מתחת לסיום הוספת הנתונים rs.update כדי לעדכן את הטבלה.

    If a<>"" and b<>"" and s<>"" Then
       rec.addNew
       rec.fields("MsgSubject").value=s
       rec.fields("Author").value=a
       rec.fields("MsgBody").value=b
       rs.Update
    End If

    מקווה שעזרתי.
    אם תרצה עזרה נוספת – רק תנסה לפרט קצת יותר מה מטרת העמוד, מה השורה המדויקת לשגיאה וכו'.


    "החיים הם רק הדרך במסע הנפש", בילד 2004-2008 <img src='/images/6.gif'>
    http://Www.Torec.Net &nbsp;* http://Www.Torec.In

שלח תשובה