Recuperer une page web html avec winsock

Description

Comment puis-je récupérer une page web ?

Créez un formulaire avec un control Microsoft Winsock ( Ctrl + T ) et appellez-le Winsock1 ainsi qu'un TextBox (Text1)

Mettez ce code dans votre Form_Load par exemple :

Source / Exemple :


Winsock1.RemoteHost = "www.vbfrance.com"
    Winsock1.RemotePort = 80
    Winsock1.Connect

' Dans le Winsock1_Connect mettez ce code :

    Dim CommandeHTTP As String
    Dim URLPageWeb As String

    URLPageWeb = "http://www.vbfrance.com/"
    CommandeHTTP = "GET " & URLPageWeb & " HTTP/1.0" & vbCrLf & "Accept: */*" & vbCrLf & "Accept: text/html" & vbCrLf & vbCrLf
    Winsock1.SendData CommandeHTTP

' Dans le Winsock1_DataArrival mettez ce code :

    Dim HTTPDonnees As String
    Winsock1.GetData HTTPDonnees, vbString
    Text1.Text = HTTPDonnees

Codes Sources

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.