PUXAR DADOS DA WEB PARA O VB
Olá pessoal, eu tentei buscar mais naum consegui..
E gostaria de saber se é possivel puxar dados de um site para o vb.. por exemplo.. eu fiz um script php q consulta o numero de novos clientes.. e gostaria de fazer um programa simples q fique atualizando de 5 em 5 min por exemplo.. eu ouvi falar q é possivel pegar esse tipo de dados: www.site.com.br/novos_clientes?qtd=2 .. isso indicaria q são dois clientes.. agora preciso disso no vb, tem como galera??
abraços..
E gostaria de saber se é possivel puxar dados de um site para o vb.. por exemplo.. eu fiz um script php q consulta o numero de novos clientes.. e gostaria de fazer um programa simples q fique atualizando de 5 em 5 min por exemplo.. eu ouvi falar q é possivel pegar esse tipo de dados: www.site.com.br/novos_clientes?qtd=2 .. isso indicaria q são dois clientes.. agora preciso disso no vb, tem como galera??
abraços..
use o componente inet1 (Internet Transfer Protocol)
ex:
Inet.Execute "www.site.com.br/novos_clientes?qtd=2"
Agora Retorne os Dados do Servidor Usando o Metodo GetChunk
assim :
Dim A as String
A = inet.GetChunk(1024,icString)
Passo a Passo
1024 > Numero de Caracteres a Ser Retornado da Resposta do Servidor ou Seja os Dados
ICString > Dados do Tipo Texto
A > A variavel "A" Retorna Dados html
Atenção > Ao Utilizar o Metodo GetChunk , pode ser que demore a Capturar os Dados do servidor porque vai depender do tempo da Resposta do Servidor sendo assim faça um loop
assim:
Do untli inet1.GetChunk(1024,icstring) <> ""
Doevents
loop
A = Getchunk(1024,icstring)
Dica: Se Quiser faça um RequestTimeout
se vc quiser que até em 5 segundos o servidor nao responder pare de aguardar a resposta
Espero ter Ajudado.
ex:
Inet.Execute "www.site.com.br/novos_clientes?qtd=2"
Agora Retorne os Dados do Servidor Usando o Metodo GetChunk
assim :
Dim A as String
A = inet.GetChunk(1024,icString)
Passo a Passo
1024 > Numero de Caracteres a Ser Retornado da Resposta do Servidor ou Seja os Dados
ICString > Dados do Tipo Texto
A > A variavel "A" Retorna Dados html
Atenção > Ao Utilizar o Metodo GetChunk , pode ser que demore a Capturar os Dados do servidor porque vai depender do tempo da Resposta do Servidor sendo assim faça um loop
assim:
Do untli inet1.GetChunk(1024,icstring) <> ""
Doevents
loop
A = Getchunk(1024,icstring)
Dica: Se Quiser faça um RequestTimeout
se vc quiser que até em 5 segundos o servidor nao responder pare de aguardar a resposta
Espero ter Ajudado.
Tópico encerrado , respostas não são mais permitidas