% strsql = "select * from tblproductos where categoria= 'acondicionamiento primario' order by categoria, subcategoria, titulo" set con=Server.CreateObject("ADODB.Connection") con.Open "Provider=SQLOLEDB;Data Source=Hercules;Initial Catalog= DBTitMex;User Id=titmexusr;Password=titmexpwd" Set rs = Server.CreateObject("ADODB.Recordset") rs.Open strsql, con,3,1 %>