<%option explicit%> <% dim sqls, rss, SubTitulo sqls = "SELECT * FROM produtos WHERE id=" & request.queryString("idProduto") set rss = connect.execute(sqls) %>

<% Dim rs, sql sql = "SELECT * FROM produtos WHERE id=" & request.queryString("idProduto") set rs = connect.execute(sql) If not rs.eof then %>  <%=rs("nome")%> " class="texto">Ver carrinho de Orçamento     .jpg" width="227" height="237" class="foto" > <%If rs("descrição") <> "" then response.write "Descrição: " &rs("descrição") response.write " " End if %> " name="idProduto"> " name="nomeProduto"> " name="fotoProduto"> Adicionar unidade(s) ao pedido de orçamento « Voltar <%End if%>