LIRE SOURCE HTML SUR WEBBROWSER SANS PASSSER PAR NAVIGATE

PCPT Messages postés 13272 Date d'inscription lundi 13 décembre 2004 Statut Membre Dernière intervention 3 février 2018 - 29 août 2008 à 01:09
PCPT Messages postés 13272 Date d'inscription lundi 13 décembre 2004 Statut Membre Dernière intervention 3 février 2018 - 29 août 2008 à 03:25
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/47793-lire-source-html-sur-webbrowser-sans-passser-par-navigate

PCPT Messages postés 13272 Date d'inscription lundi 13 décembre 2004 Statut Membre Dernière intervention 3 février 2018 47
29 août 2008 à 03:25
prends simplement ton temps et poste quand tu t'en sentiras prêt et que ta contribution sera, à tes yeux, du même acabit que ce que tu trouves pour t'aider ;)

là il n'y avait qu'une ligne de code, puis 4 au final, c'est insuffisant

dans le zip que je t'ai envoyé c'est plus massif et par un système que tu voulais éviter, rien ne t'empêche alors de faire un mix des 2...

au final, c'est ton évènement _CHANGE qui vient tout bloquer

avec FORM2, lis ta base par la classe et modifie ainsi :

Private Sub ShowWebFromRS()
WebBrowser1.Navigate2 "about:blank"
Do Until WebBrowser1.ReadyState = READYSTATE_COMPLETE
DoEvents
Loop
WebBrowser1.Document.Write ADO.RS!fldNoms
End Sub

plus besoin de fichier temporaire, et tu cumules des 2 méthodes ;)
tu peux aussi alors te séparer du module et supprimer la destruction du fichier

bonne soirée
polodie Messages postés 2 Date d'inscription dimanche 10 septembre 2006 Statut Membre Dernière intervention 29 août 2008
29 août 2008 à 02:56
J'ai lu ta réponse et je t'en remercie.

justement, ce que je tentais de faire était d'éviter de passer par tout un tas de code et un fichier temporaire, ce que je faisais déjà.

Ta réponses et tes conseils ont cependant stimulés mes méninges et je m'y suis collé.

je viens de trouver la solution cette nuit

il suffisait de rajouter

On Error Resume Next
Do Until WebBrowser1.ReadyState = READYSTATE_COMPLETE
DoEvents
Loop

Merci quand même. Je ne modifie pas mon zip puisque ma source sera out. Dommage, je ne laisserais donc jamais de traces électronique.

Mon intention n'était pas de polluer ce site . je le trouve suffisamment extraordinaire. Pardonnes donc les élans de quelqu'un qui n'est pas programmeur, sans doute peu doué dans ce domaine, et à l'évidence pas très au courant de ce qu'il faut faire pour contribuer à un tel univers
PCPT Messages postés 13272 Date d'inscription lundi 13 décembre 2004 Statut Membre Dernière intervention 3 février 2018 47
29 août 2008 à 01:28
... ton code se résume à une seule ligne ?

WebBrowser1.Document.Write txtNom.Text

ne passe pas par l'objet graphique ADODC, mais directement pas les ActiveX ADO
http://www.codyx.org/snippet_connexion-base-donnees-access_107.aspx#1907

de là tu lis ton champ par code, et tu écris la valeur dans un fichier temporaire
http://www.codyx.org/snippet_generer-nom-fichier-temporaire-unique_619.aspx
http://www.codyx.org/snippet_enregistrer-chaine-caractere-dans-fichier_33.aspx

et tu n'as plus qu'à charger par webbrowser.navigate2 CHEMIN_GENERE
PCPT Messages postés 13272 Date d'inscription lundi 13 décembre 2004 Statut Membre Dernière intervention 3 février 2018 47
29 août 2008 à 01:09
salut,
les demandes d'aide se font sur le forum, pas par le dépôt de sources non-fonctionnelles.

CodeS-SourceS est un site de partage de ressources en développement, pas un FTP gratuit...

suppression très prochaine
Rejoignez-nous