<% Set catRS = Server.CreateObject( "ADODB.Recordset" ) 'If IsObject(Con) = false Then ' Set Con = Server.CreateObject( "ADODB.Connection" ) 'End If catRS.ActiveConnection = Con sqlString = "SELECT DISTINCT product_category, product_min FROM Products " sqlString = sqlString & "WHERE product_status=1 " sqlString = sqlString & "ORDER BY product_category" catRS.Open sqlString %> Macter macchine agricole concessionaria New Holland