צפיות
תשובות
בעיה בRecordset ואני חושב שבכלל גם
הנה האתר ובו רשומה התקלה:
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 תשובות
תשובה
זה קצת מוזר.
קודם כל, לא ממליץ לך להשתמש עם 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 * http://Www.Torec.In