Ya no se me ocurre nada para solucionar como mostrar el RS

[u_goldman]

Trata así:

Código:

<%			
set RS = Server.CreateObject("ADODB.RecordSet")
RS.Open "SELECT Imagen, Nombre, Precio FROM Productos WHERE IdNegocio = 1", session("conn")

RS_Cols = RS.GetRows

RS.Close
set RS = nothing

Imagen = 0
Precio = 2
Nombre = 1
counter = 0
%>
<table border="1" align="center" cellpadding="0" cellspacing="0" ID="Table6">
<tr>
<% 
For a=0 to UBound(RS_Cols,2) 
	counter = counter + 1
	%>
	<td width="170" height="103" align="center"><img src="<%=RS_Cols(a,0)%>" width="130" height="117"></td>
	<td><%=RS_Cols(a,1)%></td>
	<td><%=RS_Cols(a,2)%></td>	
	<% 
	if counter = 3 then
	Response.Write("</tr>")
	counter = 0
	end if 
next
%>