SIMULAÇÃO DE EMPRÉSTIMO
Preencha os campos e clique em simular:
<%=Request.QueryString("msg")%>
Produto:
<% qp="SELECT * FROM T_PRODREPRE,T_PRODUTO WHERE T_PRODREPRE.IDPRODUTO=T_PRODUTO.IDPRODUTO AND IDREPRESENTANTE="&Session("IDREPRESENTANTE") Set RSp=Conexao.Execute(qp) RSp.MoveFirst Do Until RSp.EOF %>
" <%if cInt(Session("SIM_IDPRODUTO"))=cInt(RSp("T_PRODUTO.IDPRODUTO")) then Response.Write "selected" End if%>><%=RSp("NOME")%>
<% RSp.MoveNext Loop %>
Valor:
R$
">
Nº de Parcelas:
">