Δημιουργήστε την ιστοσελίδα σε HTML . Βεβαιωθείτε ότι η σελίδα περιλαμβάνει δύο πεδία εισαγωγής κειμένου που ονομάζεται " χρήστη " και "κωδικός πρόσβασης ". Ρυθμίστε τη δράση φόρμα για να καλέσετε " input.cgi " από το cgi - bin στο διακομιστή σας . Αποθηκεύστε το HTML ως " info.html . " 2
Δημιουργήστε το δέσμης ενεργειών διακομιστή . Για PERL να μιλήσει σε μια βάση δεδομένων , θα πρέπει να χρησιμοποιήσετε τη μονάδα DBI . Το ακόλουθο script δείχνει πώς να συνδεθείτε στη βάση δεδομένων : # /usr /bin /perl - Wuse CGI ? Χρησιμοποιώ το DBI ? Εκτύπωση " Content-type : text /html \\ n \\ n" ? $ Cgi = CGI - > νέα ( ) ? $ user = $ cgi - > param ( «χρήστης» ) ? $ password = $ cgi - > param ( «κωδικό πρόσβασης» ) ? $ dbh = DBI - > connect ( " dbi : Oracle : your_Database_name " , " το_όνομα_χρήστη_σας " , " your_password " ) ή να πεθάνουν " δεν είναι δυνατή η σύνδεση με τη βάση δεδομένων της Oracle : $ DBI :: errstr \\ n " ? Θα πρέπει να πάρετε τις τιμές για " your_Database_name "," το_όνομα_χρήστη_σας , "και" your_password " από το διαχειριστή του διακομιστή σας . Για αυτό το σεμινάριο , υποτίθεται ότι έχετε ήδη αυτές τις πληροφορίες .
Εικόνων 3
Γράψτε το SQL . Για να το κάνετε αυτό , θα πρέπει να έχετε έναν πίνακα που παρατίθεται στο Oracle που μπορούν να λάβουν τα δύο πεδία . Καλέστε τον πίνακα " user_auth " και βεβαιωθείτε ότι έχει μια στήλη που ονομάζεται "χρήστης" και ένα άλλο που ονομάζεται " pwd ". Η ακόλουθη δήλωση SQL θα εισάγει τα δεδομένα στο τραπέζι : $ sqlstatement = " INSERT INTO ΑΞΙΕΣ user_auth ( '$ το χρήστη ', ' $ password ')" ? $ Sth = $ dbh - > προετοιμασία ( $ sqlstatement ) ? $ Sth - > εκτελέσει
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα