Ver Mensaje Individual
  #1 (permalink)  
Antiguo 09/01/2004, 18:44
kunfu_man
 
Fecha de Ingreso: enero-2004
Mensajes: 6
Antigüedad: 21 años, 3 meses
Puntos: 0
ayuda con el winsock!

en mi proyecto uso el winsock para obtener el codigo fuente de alguna pagina mediante esta forma

Private Sub Command1_Click()
Winsock1.Connect host , port
End Sub

---------------------------------------------------------------------

Private Sub Winsock1_Connect()

stc = "GET /pagina_web.html HTTP/1.0" + vbCrLf
stc = stc + "Accept: */*" + vbCrLf
stc = stc + "Accept: text/html" + vbCrLf
stc = stc + "Host: " + Winsock1.RemoteHost + vbCrLf
stc = stc + vbCrLf

Winsock1.SendData stc

End Sub

---------------------------------------------------------------------

Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Winsock1.GetData Datos , vbString
End Sub

---------------------------------------------------------------------
mi duda es , hay alguna forma de indicarle al winsock que no obtega todo el codigo fuente de una pagina web, si no que a partir de determinados bytes empiece a obtener el codigo?.

suponiendo que el content-length de una pagina es de 10000 , y quiero que el winsock empiece a obtener el codigo a partir de la mitad osea 5000 "content-Star=5000"

por ejemplo algo asi

stc = "GET /pagina_web.html HTTP/1.0" + vbCrLf
stc = stc + "Accept: */*" + vbCrLf
stc = stc +"Content-Star: 5000" + vbCrLf
stc = stc + "Accept: text/html" + vbCrLf
stc = stc + "Host: " + Winsock1.RemoteHost + vbCrLf
stc = stc + vbCrLf

Winsock1.SendData stc

se puede hacer ?