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. On suppose que l'enregistrement "jean1","pass" existe et nous allons le modifier par les valeurs Nom et Pass définies ci-dessous.
<%
Nom=jean
Pass=WSXCRFEG
Set Conn=Server.createObject("ADODB.Connection")
Conn="mabase"
%>
Utilisation de ADO pour insérer un enregsitrement et du curseur rs
Modification d'un seul enregistrement avec vérouillage de la table
<%
Set rs=server.createObject ("ADODB.recordset")
sql="select * FROM utilisateur WHERE nom='jean1'"
rs.Open sql, conn, 1, 2 ,1 '( voir ouvrir et fermer une connexion à une basel )
rs.fields("Nom_user")=Nom
rs.fields("Pass_user")=Pass
rs.update
rs.close
set rs=nothing
Conn.close
Set conn=nothing
%>
Modifier plusieurs ligne avec UpdateBatch
On suppose par exemple qu'il existe plusieurs enregistrements Jean1
<%
Set rs=server.createObject ("ADODB.recordset")
sql="select * FROM utilisateur WHERE nom='jean1'"
rs.Open sql, conn, 1, 4 , 1 ' ( voir ouvrir et fermer une connexion à une basel )
do while not rs.eof
rs.fields("Nom_user")=Nom
rs.fields("Pass_user")=Pass
rs.movenext
Loop
rs.updateBatch
rs.close
set rs=nothing
Conn.close
Set conn=nothing
%>
Utilisation de SQL et de l'instruction UPDATE
<%
SQLUPDATE= "UPDATE utilisateur " _
&"SET Nom_user='" &Nom&"', "_
&Pass_user='"&Pass&"' WHERE nom_user='jean1'"
Conn.execute(SQLUPDATE)
Conn.close
Set conn=nothing
%>