Ver Mensaje Individual
  #1 (permalink)  
Antiguo 21/05/2009, 17:43
jasamestica
 
Fecha de Ingreso: marzo-2006
Mensajes: 329
Antigüedad: 19 años, 1 mes
Puntos: 1
winsock y http

como puedo enviar una peticion http a un servidor web por ejemplo
a la siguiente pagina www.policia.es/bit/index.htm(es una direccion de ejemplo solamente) con un winsock. que debo poner en la variable peticion para que dataaarival me devuelva una respuesta


Private Sub Conectar_Click()

Winsock1.SendData Peticion

End Sub

Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim Datos$
Winsock1.GetData Datos, vbString, bytesTotal 'Obtenemos los datos
Text1.Text = Datos
End Sub