Utilisation des modules Winsock By Akhenathon !

Question

Bonjour &#224; tous,



J'essaie de t&#233;l&#233;charger des pages web sur le site paris-turf, j'utilise
pour &#231;a les modules Winsock d&#233;velopp&#233;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&#233;j&#224; l&#224; 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&#233; mes actions, si quelqu'un a une id&#233;e, merci d'avance.

 Tchicken

cs_Jack · Answer

Salut
Tu nous parle de l'utilisation d'un bout de code cr&#233;&#233; par qqun.
La moindre des choses aurait &#233;t&#233; 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&#244;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&#233;pondrai pas aux messages priv&#233;s 

Le savoir est la seule mati&#232;re qui s'accroit quand on la partage. (Socrate)

cs_Jack · Answer

Ou pose ta question &#224; l'auteur ...

Utilisation des modules Winsock By Akhenathon !

2 réponses

Discussions similaires