Recupération de code html en une fonction

0/5 (12 avis)

Vue 6 911 fois - Téléchargée 852 fois

Description

Cette fonction permet de récuperer le code source html d'une page en un appel de fonction... celle si retarde l'éxécution jusqu'à avoir sa réponse, je vous conseille donc de l'utiliser dans tous les cas dans une thread pour ne pas risquer de figer votre appli ! Personnellement, je l'ai élaborée dans le but de récuperer des identifications sur mon site mais il est possible de l'utiliser pour d'autres traitement!

Source / Exemple :


// Voir Zip

Conclusion :


Bon coding :)

Codes Sources

A voir également

Ajouter un commentaire Commentaires
H60 Messages postés 46 Date d'inscription dimanche 20 décembre 2009 Statut Membre Dernière intervention 5 février 2012 1
10 sept. 2007 à 10:30
Salut
je viens de voir ton source qui doit correspondre exactement à ce que je cherche. Malheureusement il me génère un socket erreur
(Le nom est valide mais il ne dispose pas des données associées recherchées) si je supprime ProcessMessages je n'ai plus d'erreur mais j'obtiens ton message('Problème d''accès au serveur HTTP'). J'utilise Delphi6. Peux tu me donner une solution? Actuellement j'utilise un WebBrowser qui fait correctement le boulot sauf que je souhaite que mon appli tourne en tâche de fonds et que dans ce cas le WebBrowser ne charge pas les pages HTML.
Merci pour ton aide
delphinait Messages postés 78 Date d'inscription lundi 23 août 2004 Statut Membre Dernière intervention 19 novembre 2008
8 sept. 2004 à 12:44
bon travaille cyrille
cs_Cyrille2 Messages postés 113 Date d'inscription vendredi 16 août 2002 Statut Membre Dernière intervention 15 mai 2005
6 juin 2003 à 14:33
Voila, g eu le tps, g corrigé (depuis g du refaire le meme genre d'opération donc g mieux compris le bug) ...
bon coding
cs_Cyrille2 Messages postés 113 Date d'inscription vendredi 16 août 2002 Statut Membre Dernière intervention 15 mai 2005
17 mars 2003 à 21:50
la function en elle meme retourne le résultat sous forme de string! essaie un simple pos !
var mastring : string;
mastring := recup_page(...);
if not (pos('machin',mastring) = 0) then ...
g écrit mon commentaire rapidement alors tu risques de voir des erreurs mais t'as suffisament d'indices pour corriger =)
jdaviaud Messages postés 151 Date d'inscription mercredi 8 janvier 2003 Statut Membre Dernière intervention 8 octobre 2013
17 mars 2003 à 18:28
moi ca marche nickel avec mon site et je te remerci énormément car c'est exactement ce que je recherchais mais j'aurais une petite question, surement très simple mais bon ...
Comment faut il fait ensuite pour mettre le résultat dans une variable et vérifier si dans ce résultat, il y a une chaine de caractères spécifique présente ?

d'avance Merci
et merci pour ce bout de code !!
Afficher les 12 commentaires

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.