USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Dicas

  Visual Basic    (Internet)

Título da Dica:  Enviando dados via POST com o INET
Postada em 3/9/2003 por Ð@®l@n            
O componente INET do VB nos permite fazer transmissões de dados via método POST, nos permitindo realizar comunicações, troca de dados, com páginas na web mesmo que estas não tenham sido preparadas para este fim.

A transmissão POST apenas pode ser realizada através do método EXECUTE e não através do método OPENURL. Mas além disso existe um truque para que a transmissão funcione : É necessário enviar ao servidor um cabeçalho indicando o que está sendo transmitido, do contrário o servidor irá ignorar os dados.

Veja um pequeno exemplo :

Inet1.Execute "http://localhost/livro/testalogin.asp", "POST",strData, "Content-Type: application/x-www-form-urlencoded"

Lembre-se que o método execute é assincrono, ou seja, a aplicação não irá parar esperando que ele seja executado. Portanto é necessário que você recupere a resposta do servidor através do método getchunk utilizado no evento statechanged, veja :

Private Sub Inet1_StateChanged(ByVal State As Integer)
Dim vtdata As String
Dim res As String

If State = 12 Then
Do
vtdata = Inet1.GetChunk(1024, icString)
res = res & vtdata
Loop While Len(vtdata) <> 0
Debug.Print res
End If
End Sub
 


CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página