Une insertion dans deux tables <%@LANGUAGE="VBSCRIPT"%> <%Set cn = Server.CreateObject("ADODB.Connection") cnDBQ="dsn=tabase;uid=password;" cn.Open cnDBQ titre = Request.Form("titre_form") strsql="INSERT INTO table1 (champs,champs2) VALUES ('"&valeurs&"','"&valeurs2&"')" cn.Execute(strsql) cn.close Response.Write("insertion OK <br>") %> <%Set cn2 = Server.CreateObject("ADODB.Connection") cn2DBQ="dsn=tabase;password;" cn2.Open cn2DBQ nom = Request.Form("nom_form") strsql2="INSERT INTO table2 (champs) VALUES ('"&valeurs&"')" cn2.Execute(strsql2) cn2.close Response.Write("insertion OK <br>") %>

Si les valeurs sont des chaînes de caractère, il faut rajouter des ' , si ce sont des valeurs numériques il n'y a pas de '