VB - SINTEGRA

USUARIO.EXCLUIDOS 03/10/2006 17:20:31
#175379
Desculpa pentelhar, mas estou com muita dúvida sobre o POST!

Estou fazendo um aplicativo que confirma se um determinado cliente está ou não cadastrado no SINTEGRA do Ceara. No site (http://www.sefaz.ce.gov.br/Sintegra/Sintegra.Asp?estado=CE) eu informo o CNPJ da empresa e quando clico no submit ele traz uma tela com as informação sobre a mesma. Essas informações eu não tenho dúvida de como pegar. o problema é como chegar até ela. estou usando o seguinte código para tentar me conectar. mas ele traz outra página!! Help!!!

InetResultado.Execute "http://www.sefaz.ce.gov.br/Sintegra/result.asp", "POST", "&CGC=" & rstFonte("CNPJ") & "&B1=Consulta por CNPJ, "Content-Type: application/x-www-form-urlencoded"
USUARIO.EXCLUIDOS 03/10/2006 17:24:29
#175380
Resposta escolhida
InetResultado.Execute "http://www.sefaz.ce.gov.br/Sintegra/result.asp", "POST", "&CGC=" & rstFonte("CNPJ") & "&B1=Consulta por CNPJ, "Content-Type: application/x-www-form-urlencoded"

troca o & (e comercial) do cgc por ? (interrogação)
USUARIO.EXCLUIDOS 03/10/2006 17:35:49
#175384
Ele mostra o mesmo erro! Para testar vou mandar um CNPJ como exemplo. 03424275000140!

eu tenho que fazer esse tipo de busca em todos os estado, mas aqui no CE por exemplo deu zica!!!
USUARIO.EXCLUIDOS 03/10/2006 18:09:39
#175390
Cara, se for só pra saber se está ou não cadastrado, veja o arquivo em anexo (baseado no exemplo do GERMANIR)...Se não diga exatamente o que quer, que fica mais fácil ajudar...flw
USUARIO.EXCLUIDOS 04/10/2006 08:48:31
#175480
Matioli,

Muito bom o programa. Mas ele não atende a minha necessidade. Bem, deixa eu explicar melhor então. Quando uma empresa se cadastra no SINTEGRA ele recebe um IE (Inscrição Estadual) e recebe o um status de HABILITADO. Todo ano ele tem que atualizar determinadas informações para manter HABILITADO. Pois bem, o que eu preciso é saber se a empresa está com o status HABILIDADO ou não e, conferir se o IE que ele nos forneceu bate com o da SINTEGRA. Afinal de contas, eu não conheço nenhum forma de validar IE.

Então eu preciso informar na primeira página o CNPJ e quando clicar no botão SUBMIT da mesma ele exibe uma segunda página com todas as informações cadastrais daquele CNPJ. Ai eu tenho como pegar o status e comparar o IE.

O que eu não estou conseguindo fazer é mandar as variaveis do POST via Inet.Execute a segunda página.

netResultado.Execute "http://www.sefaz.ce.gov.br/Sintegra/result.asp", "POST", "&CGC=" & rstFonte("CNPJ") & "&B1=Consulta por CNPJ, "Content-Type: application/x-www-form-urlencoded"




VB6MASTER 04/10/2006 13:37:23
#175567
MINISTERIOXP
Tenho um sisteminha bem simples que executa isso, porém, no Estado de SP. Talvés, caso vc tenha interesse entre em contato. Estou tentando coloca-lo como anexo.
USUARIO.EXCLUIDOS 04/10/2006 13:46:38
#175571
Eu também tenho um sistema para São Paulo, que inclusive le a imagem. Só o CE que parece ser bem mais simples que deu esse pau! Eu consigo fazer usando o Webbrowser, mas não quero despadronizar o codigo!
Tópico encerrado , respostas não são mais permitidas