Message de rapport:   Re: Comment récupérer des données sur internet ?? Sujet: Re: Comment récupérer des données sur internet ?? par drcharly93 sur 27/8/2003 9:40:39 Salut Oceans Voici un bout de code tester qui fonctionne sSource est une chaîne Res est une chaîne nPos est un entier nPos2 est un entier Texte1 est une chaîne = "name="+Caract(34)+"resultat"+Caract(34) SI PAS HTTPRequête("http://www.fininfo.fr/fininfo/GetChanges.event?DeviseInSelector=USD&DeviseOutSelector=EUR")ALORS RETOUR sSource = HTTPDonneRésultat() fSauveTexte(fRepEnCours()+"\Devise.html",sSource) nPos = Position(sSource,Texte1,1) nPos = Position(sSource,"value=",nPos) nPos2 = Position(sSource,">",nPos) Res = sSource[[nPos+Taille("Value=")+1 A nPos2-1]] Res contient Le résultat de la demande Le fichier 'Devise.html' est la page generer par la demande HTTPRequete. A+

Connexion Pseudo :  Mot de passe :  Perdu le mot de passe ? Inscrivez-vous maintenant ! Menu Accueil Dossiers Articles Forums Petites Annonces Téléchargements FAQ Gabarits Glossaire Partenaires Livre d'or Réaliser un lien Plan du site Chercher WDForge avancée Chercher Web options Partenaires Visualiser tous les Partenaires...

WinDev, WebDev, WinDev Mobile et HyperFile sont des marques déposées par PCSoft. |  Voter |  Legal |  Contact |