Webbrowser Html object library
Bonjour,
j'ai un usf avec un webbrowser qui affiche une page avec des liens et du javascript dans un fichier .js
quand on clique sur un lien au lieu de charger la nouvelle page il y a l'événement:
Code:
1 2 3 4 5 6 7 8 9 10 11
|
Private Sub WebBrowser1_BeforeNavigate2(ByVal pDisp As Object, URL As Variant, Flags As Variant, TargetFrameName As Variant, PostData As Variant, Headers As Variant, Cancel As Boolean)
If URL = ThisWorkbook.Path & "\o.html" Then
Me.WebBrowser1.Document.getElementById("content").innerHTML = ""
Me.WebBrowser1.Document.getElementById("content").innerHTML = essai
Cancel = True
End If
End Sub |
ou essai étant une variable de type string qui contient du code html
le code html est bien mis à jour mais le javascript ne fonctionne plus
j'ai essayé de mettre le code js dans la page html directement et cela ne marche pas
j'ai essayé de le mettre dans la variable essai et toujours rien
je ne sais comment m'y prendre, j'espère que vous pouvez m'aider
d'avance merci