נשלח בתאריך: 28 May 2006 בשעה 22:55 | | IP רשוּם
|
|
|
|
יש לי בעיה.. החיפוש במסד הנתונים עובד, הכל עובד. אבל העריכה לא עובדת וזה לא מציג שום ארור, הוא פשוט לא עורך .. לא העלתי את הdata כי זה לא ממש הכרחי, אם אתם מוצאים בעיה בקוד בבקשה תגידו לי.
האתר: http://g.1asphost.com/JacobyElad/Jgames/Main.html
כניסת מנהל: 123456
ואלה הקודים:
edit.asp - כאן מקבל ID מפאנל הניהול ולפי זה בודק במסד הנתונים איזה id הוא גם במסד נתונים וגם במה שנשלח מפאנל הניהול, ומאפשר לשנות בעזרת טופס..:
<% if session("adminCheck")<>"true" then response.wri te "כניסה למורשים בלבד" else %> <html> <head><title> דף הניהול</title></head> <body dir="rtl"> <h2>ערוך משתמש</h2> <% path=server.mappath("data.mdb") set con=server.createobject("ADODB.Connection") con.open "driver={Microsoft Access Driver (*.mdb)};DBQ=" & path & ";" set r=con.execute("select * from personal_data where id='"&request.form("id")&"'") if r.eof then response.write "לא נמצאה רשומה עם מספר ת.ז המבוקש" else %>
<a href="admin2.asp"> לדף הניהול</a> <form action="update.asp" method="post"> <table> <tr> <td>תעודת זהבות:</td> <td> <input disabled value="<%=r.fields("id")%>"><td> <input type="hidden" name="id" value="<%=r.fields("id")%>"> </tr> <tr> <td> שם משתמש</td> <td><input name="username" value="<%=r.fields("username")%>"></td>
</tr> <tr> <td>סיסמא</td> <td><input name="pass" value="<%=r.fields("pass")%>"></td> </tr> <tr> <td>אי-מייל</td> <td><input name="mail" value="<%=r.fields("mail")%>"></td> </tr> <tr> <td>שם פרטי</td> <td><input name="f_name" value="<%=r.fields("f_name")%>"></td> </tr> <tr> <td>שם משפחה</td> <td><input name="l_name" value="<%=r.fields("l_name")%>"></td> </tr> <tr> <td align="left"><input type="submit" value="עדכן"> </td> </tr> </table></form> <% end if end if %> </body> </html>
update.asp - אמור להכניס למסד נתונים את הנתונים החדשים.
<% path=server.mappath("data.mdb") set con=server.createobject("ADODB.Connection") con.open "driver={Microsoft Access Driver (*.mdb)};DBQ=" & path & ";"
id=request.form("id") username=request.form("username") pass=request.form("pass") mail=request.form("mail") f_name=request.form("f_name") l_name=request.form("l_name")
sq="update personal_data set f_name='"&f_name&"',l_name='"&l_name&"',user name='"&username&"',mail='"&mail&"',pass='"& amp;pass&"' where id='"&id&"'" con.execute (sq) response.redirect "admin2.asp" %>
|