Utilisation des modules Winsock By Akhenathon !

Bonjour à tous,

J'essaie de télécharger des pages web sur le site paris-turf, j'utilise pour ça les modules Winsock développés par Akhenathon (www.myhackerside.fr.st)

dans mon form_load :
---------------------

    ' Creation du socket
    Winsock.LoadWinsock Me
    Winsock.Connect "www.paris-turf.com", "80"
    'chargement du POST dans la variable WinsockText
    Call MyPost
    Winsock.SendData WinsockText & vbCrLf
    WinsockText = WinsockText & vbCrLf

Déjà là je tombe en erreur 10057


Dans mon command1_click() :
------------------------------

    ' Creation du socket
    page = "tech/fr/classementturf.asp?REU_lNoSeq=" & Me.NumRParisTurf
    Call MyGet
    Winsock.SendData WinsockText & vbCrLf
    WinsockText = WinsockText & vbCrLf

'ca me ramene rien
   
    ' Creation du socket
    page = "tech/fr/reussite.asp?REU_lNoSeq=" & Me.NumRParisTurf
    Call MyGet
    Winsock.SendData WinsockText & vbCrLf
    WinsockText = WinsockText & vbCrLf

'ca me ramene la page !!!!  

    ' Creation du socket
    page = "tech/fr/listedernperf.asp?REU_lNoSeq=" & Me.NumRParisTurf
    Call MyGet
    Winsock.SendData WinsockText & vbCrLf
    WinsockText = WinsockText & vbCrLf

'ca me ramene la page !!!! 

Je ne comprend pas comment cela fonctionne, je pense que j'ai mal placé mes actions, si quelqu'un a une idée, merci d'avance.

Tchicken

Salut
Tu nous parle de l'utilisation d'un bout de code créé par qqun.
La moindre des choses aurait été de nous fournir le lien.
Perso, je n'ai pas le temps d'essayer ce genre de gadget.
Si tu connais pas bien les ficelles ce cette classe ou controle, utilise plutôt le composant Winsock.
Tu trouveras sur vbfrance des centaines d'exemples de chargement de page WEB avec ce composant.

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage. (Socrate)

Ou pose ta question à l'auteur ...