רוטר - מחיקת רשומה בASP... ע''פ סיסמא נכונה...

יומן פעילות	לוח שנה	מבזקי חדשות	תקנון	RSS	כותרות	כותרות לפי תגובה	ניקוי קוקיז	IP	להורדת אפליקציה
eBay	AliExpress	GearBest	Amazon	Booking	Kiwi	SkyScanner	Trip Advisor

"מחיקת רשומה בASP... ע''פ סיסמא נכונה..."

גירסת הדפסה

קבוצות דיון בניית אתרים נושא #6017	מנהל סגן המנהל מפקח Winner צל"ש מומחה

אשכול מספר 6017

TNTz

17:25 14.03.04

מחיקת רשומה בASP... ע''פ סיסמא נכונה...

אז ככה אני בונה רשימת ICQ: ברישום יש להכניס סיסמא .
הסיסמא תאפשר מהמשתש מחיקה של עצמו מהרשימה...
מישהו יכול לכתוב לי תנאי IF
בבסיס הנתונים יש icqnum וpassword ... יבדוק את אמיתותם ואז יבצה מחיקה לרשומה מתוך טבלת List ....
הדף מקבל 2 משתנים מטופס מספר ICQ וסיסמא כמובן...
תודה !

שתף

מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

האשכול	מחבר	תאריך כתיבה	מספר
קבל	mega-killer	14.03.04 17:30	1
תגובה... :)	TNTz	14.03.04 17:36	2
רגע, כבר ביקשת מהמסד נתונים את הסיסמא?	mega-killer	14.03.04 17:46	3
הנה ... יותר פשוט...	TNTz	14.03.04 17:51	4
...	mega-killer	14.03.04 17:58	5
זה זורק לי שגיאה..	TNTz	14.03.04 18:16	6
תשנה ל	mega-killer	14.03.04 18:45	7
למה אתה מסתבך?	Trranger	14.03.04 19:21	8
תודה רבה לשניכם!!! עזרתם לי מאוד!!	TNTz	14.03.04 19:55	9

mega-killer
חבר מתאריך 1.8.02
859 הודעות

17:30 14.03.04

1. קבל
בתגובה להודעה מספר 0

אם משהו לא ברור פשוט תגיד לי כי זה הכל די מבולגן...:

if סיסמא שהמשתמש הקליד = סיסמא נכונה then
Response.Write("למחוק")
end if

זה מה שהבנתי שאתה צריך...
אם אתה צריך משהו אחר תגיד...

(ניהול: מחק תגובה)

מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

TNTz

17:36 14.03.04

2. תגובה... :)
בתגובה להודעה מספר 1

לא הבנת אותי....
יש לי בסיס נתונים עם הטבלה בשם List
ובה יש שדות מס' ICQ , שם פרטי , כינוי , הערה , סיסמא .
אני בניתי טופס שמקבל מס' ICQ וסיסמא..
האקשן שלו זה שהוא הולך לדף נגיד , CHECK1.asp ובודק האם המספר שנכתב בטופס נכון וגם הסיסמא ואז ייבצע מחיקה של אותה רשומה...

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

(ניהול: מחק תגובה)

מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

mega-killer
חבר מתאריך 1.8.02
859 הודעות

17:46 14.03.04

3. רגע, כבר ביקשת מהמסד נתונים את הסיסמא?
בתגובה להודעה מספר 2

כי אם כן פשוט תשנה את הבקשה שביקשת ל:

select list.* from list where list.סיסמא = סיסמא שכתב and list.icq = מספק איסיקיו

מקווה שזה למה שהתכוונת...

(ניהול: מחק תגובה)

מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

TNTz

17:51 14.03.04

4. הנה ... יותר פשוט...
בתגובה להודעה מספר 3

ערכתי לאחרונה בתאריך 14.03.04 בשעה 17:52 בברכה, TNTz

<%
TheDSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.mappath("icqlist.mdb")
Set cn = Server.CreateObject("ADODB.Connection")
cn.Open TheDSN
set rs = Server.CreateObject("ADODB.RecordSet")
SQL = "select * from list WHERE icqnum=" & request.form("icqnum")
if request.form("icqnum")="' & icqnum & '" and request.form("pass")="' & password & '" then
del = "delete * from list where icqnum=" & request.form("icqnum")
rs.Open SQL, del ,TheDSN
End If
Response.Redirect"Default.asp"
%>

וזה לא מוחק את הרשומה...

(ניהול: מחק תגובה)

מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

mega-killer
חבר מתאריך 1.8.02
859 הודעות

17:58 14.03.04

5. ...
בתגובה להודעה מספר 4

<%
TheDSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.mappath("icqlist.mdb")
Set cn = Server.CreateObject("ADODB.Connection")
cn.Open TheDSN
set rs = Server.CreateObject("ADODB.RecordSet")
Set aC = Server.CreateObject("ADODB.Connection")
aC.connectionstring = strCon
aC.open

SQL = "select * from list WHERE icqnum=" & request.form("icqnum")
rs.Open SQL, del ,TheDSN
if request.form("icqnum")="' & rs("icqnum") & '" and request.form("pass")="' & rs("password") & '" then
del = "delete * from list where icqnum=" & request.form("icqnum")
aC.Execute(del)
End If
rs.close
cn.close
Response.Redirect("Default.asp")
%>

שיניתי פה קצת דברים...
אני מקווה שזה עוזר

(ניהול: מחק תגובה)

מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

TNTz

18:16 14.03.04

6. זה זורק לי שגיאה..
בתגובה להודעה מספר 5

Microsoft VBScript compilation error '800a03f9'
Expected 'Then'
/icqlist/delete1.asp, line 11

if request.form("num")="' & rs("icqnum") & '" and request.form("pass")="' & rs("password") & '" then
--------------------------------^

(ניהול: מחק תגובה)

מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

mega-killer
חבר מתאריך 1.8.02
859 הודעות

18:45 14.03.04

7. תשנה ל
בתגובה להודעה מספר 6

ערכתי לאחרונה בתאריך 14.03.04 בשעה 18:46 בברכה, mega-killer

if request.form("icqnum")= rs("icqnum") and request.form("pass")= rs("password") then

אבל אחי, תשנה את rs("icqnum") למה שכתוב במסד נתונים
וגם את rs("password") למה שכתוב במסד...

(ניהול: מחק תגובה)

מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

Trranger

19:21 14.03.04

8. למה אתה מסתבך?
בתגובה להודעה מספר 7

תעשה תנאי ברמת הSQL.

TheDSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.mappath("icqlist.mdb")
Set cn = Server.CreateObject("ADODB.Connection")
cn.Open TheDSN
SQL="delete from list where icqnum="& request.form("icqnum")
SQL=SQL&" and password='"&request.form("pass")&"'"
cn.execute SQL
cn.close
set cn=nothing
Response.Redirect"Default.asp"

(ניהול: מחק תגובה)

מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

TNTz

19:55 14.03.04

9. תודה רבה לשניכם!!! עזרתם לי מאוד!!
בתגובה להודעה מספר 8

(ניהול: מחק תגובה)

מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד