<%@LANGUAGE="VBSCRIPT"%>
<%
Dim rsCategoria
Dim rsCategoria_numRows
Set rsCategoria = Server.CreateObject("ADODB.Recordset")
rsCategoria.ActiveConnection = MM_ConectaGrupoAxa_STRING
rsCategoria.Source = "SELECT IdCategoria, IdSubCatInicio, Categoria FROM Categoria ORDER BY Categoria ASC"
rsCategoria.CursorType = 0
rsCategoria.CursorLocation = 2
rsCategoria.LockType = 1
rsCategoria.Open()
rsCategoria_numRows = 0
%>
<%
Dim rsMarca
Dim rsMarca_numRows
Set rsMarca = Server.CreateObject("ADODB.Recordset")
rsMarca.ActiveConnection = MM_ConectaGrupoAxa_STRING
rsMarca.Source = "SELECT * FROM Marca ORDER BY Marca ASC"
rsMarca.CursorType = 0
rsMarca.CursorLocation = 2
rsMarca.LockType = 1
rsMarca.Open()
rsMarca_numRows = 0
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index
Repeat1__numRows = -1
Repeat1__index = 0
rsCategoria_numRows = rsCategoria_numRows + Repeat1__numRows
%>
<%
Dim Repeat2__numRows
Dim Repeat2__index
Repeat2__numRows = -1
Repeat2__index = 0
rsMarca_numRows = rsMarca_numRows + Repeat2__numRows
%>
Grupo Axa e-commerce - Categorias de producto - Busqueda por tipo - Busqueda por marca
Víctor Criado y Tejada 2782
Urb. Elio. Lima-Cercado
Telf.: (01) 564-3874 Cel.: 9661-9500
