Discussion :

[youn1096]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[SilkyRoad]

bonsoir

Que contient la variable essai ?


As tu testé l'exemple de la FAQ :
Comment créer une page html dynamiquement dans un WebBrowser et y ajouter une fonction JavaScript ?


bonne soirée
michel

[youn1096]

Bonjour SilkyRoad,

ma variable contient du code HTML de ce genre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
Text = Text & "<h1 class=" & Chr(34) & "TrInd" & Chr(34) & ">"
Text = Text & "<div id=" & Chr(34) & "sm" & Chr(34) & " class=" & Chr(34) & "red" & Chr(34) & "></div>"
Text = Text & "<div class=" & Chr(34) & "nomind" & Chr(34) & ">essai</div>"
Text = Text & "<div class=" & Chr(34) & "resultat" & Chr(34) & ">20</div>"
Text = Text & "<div class=" & Chr(34) & "resultat" & Chr(34) & ">130</div>"
Text = Text & "<div class=" & Chr(34) & "resultat" & Chr(34) & ">1300</div>"
Text = Text & "</h1>"
Text = Text & "</div>"
Text = Text & "<div class=" & Chr(34) & "com" & Chr(34) & " >"
Text = Text & "<div id=" & Chr(34) & "commentaire" & Chr(34) & " >"
Text = Text & "ddddd"
Text = Text & "</div>"
Text = Text & "</div>"
Text = Text & "</div>"
Text = Text & "</div>"
 
 
essai = Text

je n'ai pas tout mis!

en fait mon javascript se trouve dans un fichier séparé et j'utilise aussi JQUERY

encore une question : ou peut on trouver de la doc sur la html object library ?

[SilkyRoad]

bonsoir

je ne suis pas un spécialiste en java script mais je ne vois pas d'appel de fonction dans ton code html.

bonne soirée
michel

[youn1096]

il n'y en a pas, mon code javascript se trouve dans le fichiers essai2.js qui contient ceci:

Code js :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
jQuery().ready(function(){
 
 
    $(".com").hide();
    $(".FrInd").hide();
    $(".FrItem").hide();
    $(".listeSm").hide();
 
});

et dans mon head il ya ceci:

Code html :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
    <script src='js/jquery.js' type='text/javascript'></script>
    <script src='js/essai2.js' type='text/javascript'></script>

pour le reste de ma page le code fonctionne parfaitement
mais pour le contenu changer par vba, le code ne s'execute pas comme s' il fallait rechargé les scripts js maintenant je peux le faire avec la methode du liens que vous m'avez montrer mais je ne peux pas mettre toute la biblitheque JQUERY dans ma page
ou bien si ?