<% salvar = request.querystring("id") Set sql = abredb.Execute("select * from categoria where codigo =" & salvar & "") %>
<%= 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") %>