EMPRESAS - CADASTRO
Nome
:
CNPJ
:
Insc. Municipal :
Endereço
:
Número
:
Complemento :
Bairro
:
Cidade
:
<% Set DataBase = Server.CreateObject("ADODB.Connection") DataBase.Open session("stringconexaoplan") Set rsEstado = DataBase.Execute("SELECT Estado,Nome FROM Estados order by Nome") %>
Estado
:
Selecione . . .
<% Do Until rsEstado.EOF = True %>
"><%=rsEstado("Nome")%>
<% rsEstado.MoveNext Loop %>
Cep
:
Telefone
:
Fax
:
E_Mail
:
Home Page
:
Contato
:
Telefone
:
Celular
:
E_Mail
:
Observações
: