% dim rs1, rs2, rs3, rs4, rs5, rs6 Call CreerConn Set rs1 = Server.CreateObject("ADODB.Recordset") rs1.Open "SELECT * from tblMateriel where numero = 1" , Conn, 1,3 Set rs2 = Server.CreateObject("ADODB.Recordset") rs2.Open "SELECT * from tblMateriel where numero = 2" , Conn, 1,3 Set rs3 = Server.CreateObject("ADODB.Recordset") rs3.Open "SELECT * from tblMateriel where numero = 3" , Conn, 1,3 Set rs4 = Server.CreateObject("ADODB.Recordset") rs4.Open "SELECT * from tblMateriel where numero = 4" , Conn, 1,3 Set rs5 = Server.CreateObject("ADODB.Recordset") rs5.Open "SELECT * from tblMateriel where numero = 5" , Conn, 1,3 Set rs6 = Server.CreateObject("ADODB.Recordset") rs6.Open "SELECT * from tblMateriel where numero = 6" , Conn, 1,3 %>







