En supposant que notre base mabase.mdb contienne une table utilisateur et deux champs Nom_user et Pass_user, et que la base de données est définie dans le DSN sous le nom mabase.
Dans cette table on insère le contenu des deux variable nom et Pass.
<%
Nom=jean
Pass=WSXCRFEG
Set Conn=Server.createObject("ADODB.Connection")
Conn="mabase"
%>
Utilisation de ADO pour insérer un enregsitrement et du curseur rs
Ajout d'un seul enregistrement avec vérouillage de la table
<%
Set rs=server.createObject ("ADODB.recordset")
rs.Open "utilisateur", conn, 1, 2 ,2 '( voir ouvrir et fermer une connexion à une basel )
rs.Addnew
rs.fields("Nom_user")=Nom
rs.fields("Pass_user")=Pass
rs.update
rs.close
set rs=nothing
Conn.close
Set conn=nothing
%>
Si vous souhaitez ajouter plusieurs enregistrements, il est préférable d'utiliser une mise à jour par lots. Ce type de mise à jour permet d'envoyer tous les ajouts en une seule fois.
Utilisation de UpdateBatch
<%
Set rs=server.createObject ("ADODB.recordset")
rs.Open "utilisateur", conn, 1, 4 , 2 ' ( voir ouvrir et fermer une connexion à une basel )
rs.AddNew
rs.fields("Nom_user")=Nom
rs.fields("Pass_user")=Pass
rs.AddNew
rs.fields("Nom_user")=Nom1
rs.fields("Pass_user")=Pass1
etc...
rs.updateBatch
rs.close
set rs=nothing
Conn.close
Set conn=nothing
%>
Utilisation de SQL et de l'instruction INSERT
<%
SQLINSERT= "INSERT INTO utilisateur (Nom_user,Pass_user) " _
&"SELECT '" &Nom&"' As Nom_user, '"_
&Pass&"' As Pass_user;"
Conn.execute(SQLINSERT)
Conn.close
Set conn=nothing
%>