Récupérer le source (html) d' une page internet chargée dans un twebbrowser

Soyez le premier à donner votre avis sur cette source.

Vue 11 667 fois - Téléchargée 1 291 fois

Description

On me l' a demandé il y a un mois.
Je lui ai répondu mais je pense que cela peut interesser d' autres personnes ...
C' est mon cadeau de Noel pour tout le monde en quelques sorte lol

PS: désolé pour ceux qui me demandent de l' aide et qui n' ont pas de réponse, je n' ai pas le temps et je séleccionne donc les sujets qui sont interessants pour moi.

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

cs_MAURICIO
Messages postés
2233
Date d'inscription
mardi 10 décembre 2002
Statut
Modérateur
Dernière intervention
15 décembre 2014
5 -
Une dernière chose: la partie interessante n' est pas de moi.
Elle vient d' un site internet sur Delphi dont je ne me rappelle malheureusement pas...

Joyeux Noel à tous!!!
Bom Natal a todos!!! (Version Portugaise lol)
Héééé, j'le connaissais pas celui là, le mshtml !
Ben voila une belle rencontre tiens ! ça va m'être utile, j'èspère qu'il y a de la doc derrière pour s'en servir mais ça m'a lair "gros" comme truc...

Merci bien Mauricio !

Mais si c'est juste pour récupérer le source, pourquoi s'embetter avec un TWebBrowser ? Un TIdHTTPClient et un MemoSource.Text := Get('http://www.delphi.com/') suffiraient amplement non ? (bon, ok, c'est un socket bloquant, et alors ....).

Allez, joyeux Noël (ahhh, c'est dans bientôt pas longtemps !!!),
A+
japee
Messages postés
1708
Date d'inscription
vendredi 27 décembre 2002
Statut
Modérateur
Dernière intervention
5 octobre 2019
1 -
Salut Mauricio.

Et ça tu connais ?

procedure TFrmPrin.BtnGetCodeClick(Sender: TObject);
begin
if WebBrowserSniff.Document <> nil then
MemoSource.Text := WebBrowserSniff.OleObject.Document.Body.InnerHTML;
end;

Bon Noël à toi aussi.
cs_MAURICIO
Messages postés
2233
Date d'inscription
mardi 10 décembre 2002
Statut
Modérateur
Dernière intervention
15 décembre 2014
5 -
Merci Florenth,

la question que l' on m' avait posé était de récupérer le code à partir d' un TWebBrowser avec une page chargée...

Salut Japee,
he bien merci pour cette soluce bien plus simple, je ne connaissais pas du tout!!!
J' espère que ça va aider certains membres ...

A+
En fait la propriété OleObject permet d'accéder directement à l'interface DOM du parseur de Microsoft. Donc les deux solutions sont quasi pareilles.
De la même façon (j'ai pas testé) il serait aussi possible de faire (WebBrowserSniff.Document AS IHTMLDocument2).all.toString

@Mauricio: oui, si tu as déjà la page dans un TWebBrowser, ce serait pas très malin de la re-létécharger ...
Tiens, au fait, pourquoi le nom des balises est en majuscules: <HTML> <HEAD> au lieu de <html> <head> comme cela l'est dans le document d'origine ?

A+

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.