<% qrepre="SELECT * FROM T_REPRESENTANTE, T_USR WHERE T_REPRESENTANTE.IDUSR=T_USR.IDUSR" Set RSrepre=Conexao.Execute(qrepre) Do Until RSrepre.EOF %> <% RSrepre.MoveNext Loop %>
Nome
CNPJ
Status  
  <%=RSrepre("CNPJ")%>  
 <%if RSrepre("T_USR.STATUS")="S" then arq="ativo.gif" else arq="inativo.gif" End if%>
<% if Request.QueryString("err")<>"" then qerr="SELECT * FROM T_ERRO WHERE NUMERRO="&Request.QueryString("err") Set RSerr=Conexao.Execute(qerr) %> <% End if %>
Adicionar Representante
<%=RSerr("TITULO")%>
<%=RSerr("DESCRICAO")%>
Nome*:
Usuario*:
Senha*:
Confirmação da Senha*:
CNPJ*:
Status*:
  Ativo     Inativo
Forma de Liberação*:
Banco (Nome)* Banco (Código)*
Agencia (Código)* Número da Conta*
Observação:
Escolha os Produtos que o Representante poderá utilizar.
<% qprod="SELECT * FROM T_PRODUTO" Set RSprod=Conexao.Execute(qprod) Do Until RSprod.EOF %> <% RSprod.MoveNext Loop %>
   ">   
  <%=RSprod("NOME")%>