FAIRE UNE INSERTION DANS DEUX TABLES (SQL)

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) VALUES ('"&valeurs&"')" 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>") %>