שלח תשובה

זירת השאלות

251
צפיות
15
תשובות

שאלה בקשר להתחברות

,‏ 28 במרץ, 2004

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

If gogo = true & session("Status") = true Then
Response.Redirect "/show_users.asp"
Else
Response.Write "שם המשתמש מושעה <BR> לבירור נוסף אנא צור קשר עם מנהל האתר "
Else
Response.Write "<center><FONT COLOR=’red’>"
Response.Write "שם המשתמש או הסיסמא אינם נכונים</FONT></center>"
End If

הכנסתי את זה אחרי שסגרתי את ההתחברות והרקורדסט

נ.ב.
נעזרתי במדריכים שלכם והם מצויינים!!!!!!!

תגיות:

15 תשובות

  1. MasterMind הגיב:

    למה זה לא עובד???
    ורק למי שלא הבין
    אני שמתי ב DB רשומה של כן/לא קוראים לה STATUS
    אם היא כן זאת אומרת שהמשתמש מושעה והדף יראה
    אתה משתמש לא מורשה או משהו כזה
    ואם היא לא אז זה יכנס לדף המאובטח !!!!
    הבנת ???
    השאלה היא למה זה לא עובד לי

  2. itay26 הגיב:

    גם אני חשבתי שזאת יכולה
    להיות הבעיה אבל שיתן את הודעת השגיאה.

  3. ניר טייב הגיב:

    משתמשים באופרטור הלוגי
    and ולא ב-אמפרסנד (&)

    If gogo = true and session("Status") = true Then

  4. ניר טייב הגיב:

    ועכשיו זה ייתן שגיאה על ה-elseים
    ששמת

  5. MasterMind הגיב:

    אוקיי עוד שאלה::

    איך אני יכול לעשות שכאשר משתמש חסום נכנס זה רושם לו:
    "אתה משתמש חסום"
    וכאשר משתמש שטעה בסיסמא יכנס יהיה רשום לו ::
    שם המשתמש או הסיסמא אינם נכונים
    וכמובן כאשר הוא יכניס קוד ושם נכונים
    והוא לא חסום
    אז זה יכנס לו לדף המאובטח !!!!!

  6. אוריקס הגיב:

    אם רק שם המשתמש נכון אז תן לו שגיאת
    סיסמא וכך תפעל בהתאם לכל מה שאתה רוצה…

  7. אוריקס הגיב:

    לא,
    אפשר לכתוב עוד תנאי ב Else – If, כמו שאתה בטח יודע…

  8. MasterMind הגיב:

    וואלה אתה יודע מה
    שמעתי על התנאי הזה אבל אני לא יודע איך משתמשים בו
    (שמעתי עליו בשיעורי תיכנות C++) בכל אופן
    אתה תוכל להסביר לי איך להשתמש ?????
    אם יש לך איי סי קיו 166327526

  9. MasterMind הגיב:

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

    ADODB.Fields error ‘800a0cc1’

    ADO could not find the object in the collection corresponding to the name or ordinal reference requested by the application.

    /login.asp, line 24

    הנה שורה 24


    if rs.fields("Status") = true then

    הנה הקוד של ה ElseIf

    If gogo = true and session("Status") = false Then
    Response.Redirect "/show_users.asp"
    elseif gogo = true and session("Status") = true Then
    Response.Write "<center><FONT COLOR=’red’>"
    Response.Write "שם המשתמש מושעה <BR> לבירור נוסף אנא פנה למנהל האתר </FONT></center>"
    elseif gogo = false and session("Status") = false Then
    Response.Write "<center><FONT COLOR=’red’>"
    Response.Write "שם המשתמש או הסיסמא אינם נכונים</FONT></center>"
    End If

  10. MasterMind הגיב:

    נראה לי שהוא כן מכיל
    סתכלי הנה הקוד השלם !!!!!

    %>
    Dim conn, rs, SQLstr, gogo

    Set conn = Server.CreateObject("ADODB.Connection")
    Set rs = Server.CreateObject("ADODB.Recordset")
    conn.Open "myDSN"

    SQLstr="SELECT ID,Password,Admin FROM godonodo "
    SQLstr= SQLstr & "WHERE Login=’" & Request("Login") & "’"
    rs.Open SQLstr,conn

    If Rs.EOF Then
    Else
    If Request("Password")<>rs("Password") Then
    gogo=false
    Else
    gogo=true
    Session("ID") = rs("ID")
    if rs.fields("Admin") = true then
    session("Admin") = true
    Else
    session("Admin") = false
    if rs.fields("Status") = true then
    session("Status") = true
    else
    session("Status") = false
    End If
    End If
    End If
    End If

    rs.Close
    conn.Close
    Set rs = Nothing
    Set conn = Nothing

    If gogo = true and session("Status") = false Then
    Response.Redirect "/show_users.asp"
    elseif gogo = true and session("Status") = true Then
    Response.Write "<center><FONT COLOR=’red’>"
    Response.Write "שם המשתמש מושעה <BR> לבירור נוסף אנא פנה למנהל האתר </FONT></center>"
    elseif gogo = false and session("Status") = false Then
    Response.Write "<center><FONT COLOR=’red’>"
    Response.Write "שם המשתמש או הסיסמא אינם נכונים</FONT></center>"
    End If

    %>

  11. MasterMind הגיב:

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


    <%
    dim rs , conn

    set conn = Server.CreateObject("adodb.connection")
    set rs = Server.CreateObject("adodb.recordset")
    conn.open "myDSN"

    rs.open "Select * from godonodo where " & ID & " " , conn , 3, 3
    rs.fields("Status") = true
    rs.update
    %>

    <BODY>
    <a href="LOCK_USER.ASP?id=<%=rs("ID")%>">חסימה</a>.
    </BODY>

    <%
    rs.close
    set rs = Nothing
    conn.close
    set conn = Nothing
    %>

שלח תשובה