Accéder aux objets de la page affichée par webbrowser

Commenter

Contenu du snippet

Ce code permet d'accéder aux objets créés dans une page HTML, afin de la modifier dynamiquement comme on pourrait faire avec une page internet, en javascript .

Tout d'abord, il faut référencer Microsoft HTML Objects dans Projet>Référence .
On crée ensuite le controle webbrowser .

Source / Exemple : 


'On suppose q'une page est déjà chargée dans le navigateur
'Le navigateur s'appelle wBrowser
'Dans la page, il y a 1 DIV dont l'id est mondiv
Public WithEvents html As HTMLDocument

'Maintenant :
Public Sub JECHANGETOUT()
Set html = wBrowser.document
'Et voila, on y arrive ...
dim mondiv as HTMLDivElement
set mondiv=html.getelementbyid("mondiv")

'Maintenant on peut tout modifier .
mondiv.innerText = "Bonjour"
html.body.insertadjacentHTML "BeforeEnd","Ceci est du texte ajouté ."
html.body.style.color = "#FF00FF"
 
End Sub

Conclusion :


Si vous vous y connaissez en HTML, et que vous générez comme moi des rapports sous forme de page HTML, pour la facilité d'utilisation, d'impression, et de mise en page "jolie", alors ce code devrait vous aider !

A voir également

S'inscrire maintenant

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.

Du même auteur (cs_vatoo)