<% q="SELECT * FROM T_PRODUTO WHERE IDPRODUTO="&Request.QueryString("idprod") Set RSprod=Conexao.Execute(q) %> Administração
<% if Request.QueryString("err")<>"" then qerr="SELECT * FROM T_ERRO WHERE NUMERRO="&Request.QueryString("err") Set RSerr=Conexao.Execute(qerr) %> <% End if %>
Manutenção de Produtos
<%=RSerr("TITULO")%>
<%=RSerr("DESCRICAO")%>
"> Nome*: ">
Entrada*:
Com entrada?
> Sim
"S" then Response.Write "checked" End if%>> Não
Max. de Parcelas*: ">
TAC.*: ">
Valor Min.*: ">
Valor Max.*: ">
Taxa Mensal*: "> %
Taxa Anual *: "> %
Taxa Mensal
de inadimplência*:		 "> %
Taxa Anual
de inadimplência*:		 "> %

Multa*:		 "> %
Encargos*: "> %
Garantias*:
Finalidade*:
Cancelar