Προσθέστε τον ακόλουθο κώδικα στην αρχική σελίδα σας για να παρέχει το site σας με μια σελίδα σύνδεσης ή για να δημιουργήσετε ένα σύνδεσμο για να στείλει τους χρήστες σας από την αρχική σελίδα σας σε μια σελίδα σύνδεσης. Η πρώτη γραμμή ελέγχει για να δει εάν μια συνεδρία έχει καθιερωθεί ( «Χρήστης») . Αν δεν έχει δημιουργηθεί περίοδο, τότε η γραμμή 2 του κώδικα ανακατευθύνει το χρήστη σε μια σελίδα login.asp ? . Εάν έχει ήδη συνδεθεί στο σελίδα θα εμφανίσει για το χρήστη
<% Εάν Session ( "Χρήστης " ) = 0 ThenResponse.Redirect " /login.asp ; RefURL = /default.asp " End If % > 2
Δημιουργήστε μια φόρμα για να συλλέγει το όνομα του χρήστη και τον κωδικό πρόσβασης . Γραμμή 1 στον κώδικα θα στείλει τις πληροφορίες της φόρμας σε μια σελίδα επεξεργασίας . Γραμμές 2 , 3 και 4, να συγκεντρώσει τις πληροφορίες που πρόκειται να σταλεί στη σελίδα επεξεργασίας . Η γραμμή 2 είναι κρυμμένο και δεν είναι ορατή στο χρήστη και καταγράφει το URL της τρέχουσας σελίδας . Γραμμή 3 συλλαμβάνει το όνομα του χρήστη και η γραμμή 4 συλλαμβάνει τον κωδικό πρόσβασης του χρήστη . Ονομάσετε και να αποθηκεύσετε τη σελίδα ως " login.asp " .
εικόνων
Στείλτε τις πληροφορίες της φόρμας στη σελίδα επεξεργασίας για να επαληθεύσουμε ότι τα στοιχεία που υποβλήθηκαν ταιριάζει με πληροφορίες που αποθηκεύονται στη βάση δεδομένων . Γραμμές 1-5 αίτημα της RefURL από την κεντρική σελίδα ή το site σας στο Web για να στείλετε το χρήστη για το αν η σωστή σύνδεση είναι διαθέσιμη . Γραμμές 5-10 ανοίξετε μια σύνδεση με τη βάση δεδομένων και , στη συνέχεια, ομάδα εγγραφών ελέγχει για να διαπιστώσει εάν τα δεδομένα που έχετε εισάγει ταιριάζει με μια γραμμή στη βάση δεδομένων . Γραμμές 11-17 δούμε αν αυτό είναι το σωστό και είτε να σας στέλνει πίσω στο login.asp αν "False " ( εσφαλμένα στοιχεία σύνδεσης ) ή αν το " True" καθιερώνει μια σύνοδο για τον χρήστη . Γραμμές 18-19 κλείσετε τη σύνδεση με τη βάση δεδομένων και εγγραφών . Η γραμμή 12 δημιουργεί το μήνυμα να δώσει το χρήστη και προσθέτει επάνω στο URL , έτσι ώστε να ενημερώνει τον χρήστη ότι εισάγει λάθος πληροφορίες ( δείτε το βήμα 4 ) . Όνομα και αποθηκεύστε τη σελίδα επεξεργασίας " login_proc.asp " .
<% Εάν Request.Form ( " RefURL " ) <> " " ThenRefURL = Request.Form ( " RefURL " ) ElseRefURL = "admin /default.asp " End If
Set Conn = Server.CreateObject ( " ADODB.Connection " ) conn.Open" Provider = SQLOLEDB ? DATA SOURCE = mssql02.1and1.com ? UID = dbo266996089 ? ΑμεΑ = dhaka06 ? DATABASE = db266996089 " Set RS = Server.CreateObject ( " ADODB.RecordSet " )
SQL = " SELECT * FROM WHERE tbl_Login UserName = " & Request.Form ( " username ") & " κΑΙ Κωδικού = ' " & Request.Form ( " Password " ) & " ' "
Σετ RS = Conn.Execute ( SQL )
Εάν RS.EOF thenResponse.Redirect ( " login.asp ; MSG = Λάθος όνομα χρήστη ή τον κωδικό πρόσβασης . Παρακαλώ δοκιμάστε ξανά ! " ) ElseSession ( " Χρήστης " ) = TrueSession ( " username " ) = RS ( " username ") Response.Redirect RefURLEnd Αν
Set Conn = NothingSet RS = τίποτα % >
Η 4
Προσθέστε την ακόλουθη γραμμή κώδικα ακριβώς πάνω από τον κωδικό της φόρμας σας (βήμα 2 ) στο login.asp .
<% = Request.QueryString ( " msg " ) % >
Αν υπάρχει μια επιτυχημένη βάση δεδομένων ταιριάζουν με τη σελίδα σας θα εμφανιστεί στη χρήστη.Αν βρεθεί δεν ταιριάζει ο κωδικός στο βήμα 3 θα στείλει το χρήστη πίσω στην σελίδα login.asp και να εμφανίσει το μήνυμα " Μη έγκυρο όνομα χρήστη ή τον κωδικό πρόσβασης . Παρακαλώ δοκιμάστε ξανά ! " .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα