Connexion de la base de données:
Ce qui suit est le contenu de référence:
<%
Définir Conn = Server.CreateObject (ADODB.Connection)
Conn.open Driver = {Microsoft Access Driver (* .mdb)};
%>
Ouvrez la base de données:
Ce qui suit est le contenu de référence:
exec = select * dans la table de base de données
set rs = server.createObject (adodb.oldset)
Rs.OOPEN EXEC, Conn, 1,1
Paramètre 1, 1 à lire
Lisez le format de contenu: <% = rs (champ)%>
Ajouter un programme de traitement des enregistrements:
Ce qui suit est le contenu de référence:
<%
Définir Conn = Server.CreateObject (ADODB.Connection)
Conn.open Driver = {Microsoft Access Driver (* .mdb)};
name = request.form (champ) nom, tel, message pour soumettre la valeur du champ
tel = request.form (champ)
message = request.form (champ)
exec = insérer dans les valeurs du nom de la table (champ) ('+ champ +') est séparée par une virgule avec une virgule
Conn.execcute exec utilise la soumission d'exécution
Conn.Close
Définir Conn = Rien
%>
Programme de traitement de la recherche:
Ce qui suit est le contenu de référence:
<%
name = request.form (champ) nom, Tel est la valeur de champ définie par le paramètre de formulaire du formulaire
tel = request.form (champ)
Définir Conn = Server.CreateObject (ADODB.Connection)
Conn.open Driver = {Microsoft Access Driver (* .mdb)};
exec = select * From Table Where Name = '+ Field +' et Tel = + Field
set rs = server.createObject (adodb.oldset)
Rs.OOPEN EXEC, Conn, 1,1
%>
'Le contenu de la page a recherché
<%
faire tout en pas Rs.Eof
%> <tr>
<td> <% = rs (nom)%> </td>
<td> <% = RS (Tél)%> </td>
<td> <% = rs (temps)%> </td>
</tr>
<%
Rs.MovEnext
boucle
%>
Supprimer le programme de traitement des enregistrements:
Ce qui suit est le contenu de référence:
<%
Définir Conn = Server.CreateObject (ADODB.Connection)
Conn.open Driver = {Microsoft Access Driver (* .mdb)};
exec = delete * du nom de la table où numéro = & request.form (id)
Conn.execcute exec
%>
Modifier le programme de traitement des enregistrements:
Ce qui suit est le contenu de référence:
<%
Définir Conn = Server.CreateObject (ADODB.Connection)
Conn.open Driver = {Microsoft Access Driver (* .mdb)};
exec = select * From Table Name Where Number = & request.form (id)
set rs = server.createObject (adodb.oldset)
Rs.OOPEN EXEC, Conn, 1,3 '1,3 est une signification modifiée
Rs (name) = request.form (champ) 'nom, tel, le message est la valeur de champ définie par la soumission du formulaire
rs (tél) = request.form (champ)
Rs (message) = request.form (champ)
Rs.Update
Rs.Close
Définir RS = rien
Conn.Close
Définir Conn = Rien
%>
Modifier le programme d'exécution d'enregistrement: entrez la page du numéro d'identification >>> Exporter les données d'ID correspondantes >>>>>> Programme de traitement directement modifié
Exemple de procédures de traitement de connexion:
Ce qui suit est le contenu de référence:
<%
Nom DIM, mot de passe
name = request.form (name)
mot de passe = request.form (mot de passe)
Dim Exec, Conn, Rs
exec = select * From Table Name Where (name = '& Field &' and Motword = '& Field &')
Définir Conn = Server.CreateObject (ADODB.Connection)
Conn.open Driver = {Microsoft Access Driver (* .mdb)};
set rs = server.createObject (adodb.oldset)
Rs.OOPEN EXEC, Conn
Si ce n'est pas Rs.Eof alors
Rs.Close
Conn.Close
Session (vérifié) = Oui
Session (chèque) = droite
réponse.redirect index.asp
autre
Session (vérifié) = Non
Session (chèque) = W
Response.Redirect Login.asp
terminer si
%>
Chaque page d'arrière-plan plus:
<% si ce n'est pas session (vérifié) = oui alors 'Session Définissez une variable de chaîne vérifiée
Response.Redirect Login.asp
autre
%>