EMPRESA

CATEGORIA

GRUPO

SUBGRUPO

CODIGO_1

CODIGO_2

NOMBRE

IMAGEN


<% Dim oConn,strSQL, objRS Set oConn = Server.CreateObject("ADODB.Connection") oConn.Open "DSN=andesimportdsn; UID=; PWD=;" strSQL = "SELECT DISTINCT * FROM producto order by producto.categoria, producto.rubro, producto.drubro, producto.subgrupo, producto.dproducto, producto.codigo_2, producto.producto, producto.imagen" Set objRS = oConn.Execute(strSQL) %>
<% while (not objRS.Eof) Response.Write("") objRS.MoveNext wend oConn.Close set objRS = nothing set oConn = nothing %>

CATEGORIA

GRUPO 

SUBGRUPO

CODIGO_1

CODIGO_2

NOMBRE

IMAGEN

CLICK

 " & objRS("rubro") & " "& objRS("drubro") & " "& objRS("subgrupo") & " "& objRS("dproducto") & "  "& objRS("codigo_2") & "  "& objRS("producto") & "  "& objRS("imagen") & " borrar