<%= sql("nome") %>
<%= sql("principal") %>
<%
'Set sql = abredb.Execute("select top 1 categoria.codigo, produto.id, categoria.nome, produto.id, produto.img_nome, produto.img_nome2 , produto.nomes, produto.idcategoria from categoria inner join produto on categoria.codigo = produto.idcategoria ORDER BY nome, idcategoria desc")
Set sql = abredb.Execute("SELECT * FROM produto WHERE idcategoria =" & salvar & " order by nomes desc")
If sql.EOF or sql.BOF Then
Response.Write ""
Else
Do While Not sql.Eof
%>
<%
sql.MoveNext
Loop
End If
%>
<%
Set sql = abredb.Execute("SELECT * FROM home")
%>