Utilizar WebService de CEP
Ola preciso utilizar um webservice do meu provedor KingHost, para procura de CEP, e preecher meus demais TextBoxs, como rua, bairro cidade e estado porem não consigo.
A URL BASE: http://webservice.kinghost.net/web_cep.php as Variáveis que devem ser enviadas pelo método GET:
chave: 788s88hdnjji99
formato: 'xml' ou 'query' ou 'javascript'
cep: 04005005
Utilizo RAD 2007 e banco MSServer 2005
A URL BASE: http://webservice.kinghost.net/web_cep.php as Variáveis que devem ser enviadas pelo método GET:
chave: 788s88hdnjji99
formato: 'xml' ou 'query' ou 'javascript'
cep: 04005005
Utilizo RAD 2007 e banco MSServer 2005
Paulo Freire
Curtidas 0
Respostas
Wesley Yamazack
16/06/2009
Olá,
Estamos trabalhando no seu exemplo. Peço que aguarde um pouco.
Att,
Wesley Y
Estamos trabalhando no seu exemplo. Peço que aguarde um pouco.
Att,
Wesley Y
GOSTEI 0
Rodrigo Mourão
16/06/2009
Olá amigo !!
Eu também sou cliente KingHost e acesso o WebService de CEP mais com PHP. O problema deste serviço é que ele funciona via GET e não tem um WSDL. No asp net nós precisamos de um WSDL para poder adicionar uma WEBReference no projeto e acessar via código.
Para usar o WEBService vc tem que fazer uma requisicao ao servidor da kingh host com a url e os tres parametros (chave, tipo de retorno e o cep para pesquisa) no seu caso ficaria assim:
http://webservice.uni5.net/web_cep.php?auth=788s88hdnjji99 &formato=xml&cep=11111-111
EU aconselho a sempre pesquisar por XML que é mais facil.
Agora para chamar isso via URL de dentro do Asp.net vamos ter que tentar algo alternativo ja que não temos WSDL. Vou tentar invocar o servico do asp.net e post aqui uma posição.
Abs !!
Atenciosamente,
Rodrigo Carreiro Mourão
Borland Instructor Certified
Coordenador da Consultoria em Delphi
Eu também sou cliente KingHost e acesso o WebService de CEP mais com PHP. O problema deste serviço é que ele funciona via GET e não tem um WSDL. No asp net nós precisamos de um WSDL para poder adicionar uma WEBReference no projeto e acessar via código.
Para usar o WEBService vc tem que fazer uma requisicao ao servidor da kingh host com a url e os tres parametros (chave, tipo de retorno e o cep para pesquisa) no seu caso ficaria assim:
http://webservice.uni5.net/web_cep.php?auth=788s88hdnjji99 &formato=xml&cep=11111-111
EU aconselho a sempre pesquisar por XML que é mais facil.
Agora para chamar isso via URL de dentro do Asp.net vamos ter que tentar algo alternativo ja que não temos WSDL. Vou tentar invocar o servico do asp.net e post aqui uma posição.
Abs !!
Atenciosamente,
Rodrigo Carreiro Mourão
Borland Instructor Certified
Coordenador da Consultoria em Delphi
GOSTEI 0
Rodrigo Mourão
16/06/2009
Olá Amigo, segue abaixo o código. Demorei pois pra ter ideia comecei com um código de quase 50 linhas. Mas fui refinando, refinando, refinando e chegamos a isso:
Coloque 5 textbox num pagina asp net e um botão. No clique do botão coloque o seguinte código:
var
sUrl: String;
DS: DataSet;
begin
sUrl := 'http://webservice.uni5.net/web_cep.php?auth=788s88hdnjji99&formato=xml&cep='+TextBox1.text;
DS := DataSet.Create;
ds.ReadXml(sUrl);
if Convert.ToInt32(DS.Tables['webservicecep'].Rows[0]['resultado']) = 1 then
begin
TextBox2.Text := DS.Tables['webservicecep'].Rows[0]['tipo_logradouro'].ToString+' '+
DS.Tables['webservicecep'].Rows[0]['logradouro'].ToString;;
TextBox3.Text := DS.Tables['webservicecep'].Rows[0]['bairro'].ToString;
TextBox4.Text := DS.Tables['webservicecep'].Rows[0]['cidade'].ToString;
TextBox5.Text := DS.Tables['webservicecep'].Rows[0]['uf'].ToString;
end; Digite o cep no TextBox1 e aperte o botão. Simples Assim !!!!!!!!!! Abs!
Atenciosamente,
Rodrigo Carreiro Mourão
Borland Instructor Certified
Coordenador da Consultoria em Delphi
sUrl: String;
DS: DataSet;
begin
sUrl := 'http://webservice.uni5.net/web_cep.php?auth=788s88hdnjji99&formato=xml&cep='+TextBox1.text;
DS := DataSet.Create;
ds.ReadXml(sUrl);
if Convert.ToInt32(DS.Tables['webservicecep'].Rows[0]['resultado']) = 1 then
begin
TextBox2.Text := DS.Tables['webservicecep'].Rows[0]['tipo_logradouro'].ToString+' '+
DS.Tables['webservicecep'].Rows[0]['logradouro'].ToString;;
TextBox3.Text := DS.Tables['webservicecep'].Rows[0]['bairro'].ToString;
TextBox4.Text := DS.Tables['webservicecep'].Rows[0]['cidade'].ToString;
TextBox5.Text := DS.Tables['webservicecep'].Rows[0]['uf'].ToString;
end; Digite o cep no TextBox1 e aperte o botão. Simples Assim !!!!!!!!!! Abs!
Atenciosamente,
Rodrigo Carreiro Mourão
Borland Instructor Certified
Coordenador da Consultoria em Delphi
GOSTEI 0
Rodrigo Mourão
16/06/2009
Olá amigo, o código abaixo foi suficiente ?
Estamos aguardando para encerrar o chamado !!
Abs.
Atenciosamente,
Rodrigo Carreiro Mourão
Borland Instructor Certified
Coordenador da Consultoria em Delphi
Estamos aguardando para encerrar o chamado !!
Abs.
Atenciosamente,
Rodrigo Carreiro Mourão
Borland Instructor Certified
Coordenador da Consultoria em Delphi
GOSTEI 0
Paulo Freire
16/06/2009
show de bola, deu certilho.
GOSTEI 0