Comment récupérer le contenu écrit d'une page web

[softreaver]

Salut,

Je débute en Purebasic mais je ne suis pas nouveau dans le monde de la programmation.

Voilà mon problème, je suis en train de faire un petit jeu 2D multijoueur, qui dit multijoueur dit adresse IP, j'ais réussi à récupérer l'adresse IP local, mais je n'arrive pas à récupérer l'adresse IP externe (Net IP).
J'ai vue que dans plusieur codes sources C++ ils utilisai un scrypte PHP pour récupérer l'adresse IP. J'aimerai donc savoir comment puis-je récupérer le contenu écrit d'une page web.
J'ai en effet créer un petit scrypte PHP qui écrit sur la page l'adresse IP externe et rien d'autre ainsi j'aimerais pouvoir la récupérer (attention, je ne veut pas ouvrir une page web mais juste récupérer l'adresse, en effet je suis en train de faire une dll, alors je ne veut pas que pendant le jeu une page web s'affiche et arête le jeu) . est ce possible en Pure basic? J'ai trouvé WININET.DLL qui pourrait faire l'affaire mais je ne suis pas sûr de savoir quelle commandes utilisé.

J'attend avec impatiences vos réponses.

[Anonyme]

bonjour & bienvenu.

y a ca qui traine ici :

Code : Tout sélectionner

Procedure.s OpenURL(Url.s, OpenType.b)
isLoop.b=1
  INET_RELOAD.l=$80000000
  hInet.l=0: hURL.l=0: Bytes.l=0
  Buffer.s=Space(2048)
 
  hInet = InternetOpen_("PB@INET", OpenType, #Null, #Null, 0)
  hURL = InternetOpenUrl_(hInet, Url, #Null, 0, INET_RELOAD, 0)
 
  Repeat
   
    Delay(1)
    InternetReadFile_(hURL, @Buffer, Len(Buffer), @Bytes)
    If Bytes = 0
      isLoop=0
    Else
      res.s = res + Left(Buffer, Bytes)
    EndIf
  Until isLoop=0
  InternetCloseHandle_(hURL)
  InternetCloseHandle_(hInet)
  ProcedureReturn res
  EndProcedure
 
 
URL.s = ;entree votre url
HTML.s = OpenURL(URL, 1)
debut.l = FindString(HTML,"IP : ",1) + 5
fin.l = FindString(HTML,"END",1)
ip.s = Mid(HTML,debut,(fin - debut))
SetClipboardText(ip.s)
MessageRequester("information", "votre ip est : "+ip.s+" est elle est copier dans le presse papier", 0)

à toi de l'adapter en fonction de ta page php.

[comtois]

ou ça
le premier code proposé est ancien ,faudra l'adapter, le second fonctionne
http://www.purebasic.fr/english/viewtopic.php?t=18616

[softreaver]

Merci beaucoup ces codes sembles être exactement se que je recherche.