<%@ language="VBScript" %> <% Const adOpenStatic = 3 Set Con = Server.CreateObject( "ADODB.Connection" ) Con.Open = "manudb" Set RS = Server.CreateObject( "ADODB.Recordset" ) RS.CursorType = adOpenStatic RS.ActiveConnection = Con RS.Open "SELECT * FROM contact WHERE company='vitrerie' AND status=1 ORDER BY contactid" %> Contactez-nous : Vitrerie RD 514-634-7159 à Lachine au 134 Boul. St-Joseph <% RS.Close set RS = Nothing Con.Close set manudb2 = Nothing %>