je souhaiterez simplement inserrez des page HTML dans mon=20
application (rien de plus simple)
et avoir un =E9l=E9ment 'Explorer' (=E9galement facile) mais je=20
voudrais en cliquand sur un label ou autre que le fichier=20
HTML de mon choix s'affiche dans l'=E9l=E8ment explorer.=20
Aidez-moi ce sont mes premiers pas en VB
Merci au personne qui vont se penchez sur mon probl=E8me ;)
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
François Picalausa
"Gillou" a écrit dans le message de news:02d001c3c714$b0799fe0$
je souhaiterez simplement inserrez des page HTML dans mon application (rien de plus simple) et avoir un élément 'Explorer' (également facile) mais je voudrais en cliquand sur un label ou autre que le fichier HTML de mon choix s'affiche dans l'élèment explorer. Aidez-moi ce sont mes premiers pas en VB
Bonjour/soir,
Utilise un webbrowser.Navigate dans l'événement click de tes labels. -- François Picalausa (MVP VB) FAQ VB : http://faq.vb.free.fr MSDN : http://msdn.microsoft.com
"Gillou" <anonymous@discussions.microsoft.com> a écrit dans le message
de news:02d001c3c714$b0799fe0$a001280a@phx.gbl
je souhaiterez simplement inserrez des page HTML dans mon
application (rien de plus simple)
et avoir un élément 'Explorer' (également facile) mais je
voudrais en cliquand sur un label ou autre que le fichier
HTML de mon choix s'affiche dans l'élèment explorer.
Aidez-moi ce sont mes premiers pas en VB
Bonjour/soir,
Utilise un webbrowser.Navigate dans l'événement click de tes labels.
--
François Picalausa (MVP VB)
FAQ VB : http://faq.vb.free.fr
MSDN : http://msdn.microsoft.com
"Gillou" a écrit dans le message de news:02d001c3c714$b0799fe0$
je souhaiterez simplement inserrez des page HTML dans mon application (rien de plus simple) et avoir un élément 'Explorer' (également facile) mais je voudrais en cliquand sur un label ou autre que le fichier HTML de mon choix s'affiche dans l'élèment explorer. Aidez-moi ce sont mes premiers pas en VB
Bonjour/soir,
Utilise un webbrowser.Navigate dans l'événement click de tes labels. -- François Picalausa (MVP VB) FAQ VB : http://faq.vb.free.fr MSDN : http://msdn.microsoft.com
Gillou
Merci de m'avoir répondu, je vais passer pour un nul mais, C'est à dire ? il faut faire un imports je suppose ? lequelle ?
-----Message d'origine----- "Gillou" a écrit
dans le message
de news:02d001c3c714$b0799fe0$
je souhaiterez simplement inserrez des page HTML dans
mon
application (rien de plus simple) et avoir un élément 'Explorer' (également facile) mais
je
voudrais en cliquand sur un label ou autre que le
fichier
HTML de mon choix s'affiche dans l'élèment explorer. Aidez-moi ce sont mes premiers pas en VB
Bonjour/soir,
Utilise un webbrowser.Navigate dans l'événement click de
"Gillou" a écrit dans le message de news:049201c3c7aa$eea25690$ Merci de m'avoir répondu, je vais passer pour un nul mais, C'est à dire ? il faut faire un imports je suppose ? lequelle ?
Hello,
Voici un exemple:
1. Créer une form (form1) 2. Mettre un label sur la form (label1) 3. Ajouter à ton projet le composant "Microsoft Internet Controls" 4. placer ce composant sur ta feuille (Webbrowser1) 5. Mettre dans la propriété Caption de ton label l'URL que tu veux atteindre 6. Mettre le code qui convient dans label1_click (Le "Navigate" dont parlait François)
voici le programme en entier: --------------------------------------------- Option Explicit
Private Sub Command1_Click()
End Sub
Private Sub Form_Load() Label1.Caption = "http://www.google.fr" End Sub
Private Sub Label1_Click() WebBrowser1.Navigate (Label1.Caption) End Sub --------------------------------------------------------
"Gillou" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:049201c3c7aa$eea25690$a301280a@phx.gbl...
Merci de m'avoir répondu,
je vais passer pour un nul mais, C'est à dire ?
il faut faire un imports je suppose ? lequelle ?
Hello,
Voici un exemple:
1. Créer une form (form1)
2. Mettre un label sur la form (label1)
3. Ajouter à ton projet le composant "Microsoft Internet Controls"
4. placer ce composant sur ta feuille (Webbrowser1)
5. Mettre dans la propriété Caption de ton label l'URL que tu veux atteindre
6. Mettre le code qui convient dans label1_click
(Le "Navigate" dont parlait François)
voici le programme en entier:
---------------------------------------------
Option Explicit
Private Sub Command1_Click()
End Sub
Private Sub Form_Load()
Label1.Caption = "http://www.google.fr"
End Sub
Private Sub Label1_Click()
WebBrowser1.Navigate (Label1.Caption)
End Sub
--------------------------------------------------------
"Gillou" a écrit dans le message de news:049201c3c7aa$eea25690$ Merci de m'avoir répondu, je vais passer pour un nul mais, C'est à dire ? il faut faire un imports je suppose ? lequelle ?
Hello,
Voici un exemple:
1. Créer une form (form1) 2. Mettre un label sur la form (label1) 3. Ajouter à ton projet le composant "Microsoft Internet Controls" 4. placer ce composant sur ta feuille (Webbrowser1) 5. Mettre dans la propriété Caption de ton label l'URL que tu veux atteindre 6. Mettre le code qui convient dans label1_click (Le "Navigate" dont parlait François)
voici le programme en entier: --------------------------------------------- Option Explicit
Private Sub Command1_Click()
End Sub
Private Sub Form_Load() Label1.Caption = "http://www.google.fr" End Sub
Private Sub Label1_Click() WebBrowser1.Navigate (Label1.Caption) End Sub --------------------------------------------------------
Gillou
Merci beaucoup ;)
Mais, (c'est le dernière question :)- je vous promet), je souhaiterez afficher dans cet élément une page HTM se trouvant DANS mon application et non sur le web !
Merci pour toute vos aide qui me sont vraiment précieuse ;) et Bonne fêtes de fin d'année a TOUS ;)
-----Message d'origine----- "Gillou" a écrit
dans le message de
news:049201c3c7aa$eea25690$ Merci de m'avoir répondu, je vais passer pour un nul mais, C'est à dire ? il faut faire un imports je suppose ? lequelle ?
Hello,
Voici un exemple:
1. Créer une form (form1) 2. Mettre un label sur la form (label1) 3. Ajouter à ton projet le composant "Microsoft Internet
Controls"
4. placer ce composant sur ta feuille (Webbrowser1) 5. Mettre dans la propriété Caption de ton label l'URL
que tu veux atteindre
6. Mettre le code qui convient dans label1_click (Le "Navigate" dont parlait François)
voici le programme en entier: --------------------------------------------- Option Explicit
Private Sub Command1_Click()
End Sub
Private Sub Form_Load() Label1.Caption = "http://www.google.fr" End Sub
Private Sub Label1_Click() WebBrowser1.Navigate (Label1.Caption) End Sub --------------------------------------------------------
.
Merci beaucoup ;)
Mais, (c'est le dernière question :)- je vous promet), je
souhaiterez afficher dans cet élément une page HTM se
trouvant DANS mon application et non sur le web !
Merci pour toute vos aide qui me sont vraiment
précieuse ;) et Bonne fêtes de fin d'année a TOUS ;)
-----Message d'origine-----
"Gillou" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news:049201c3c7aa$eea25690$a301280a@phx.gbl...
Merci de m'avoir répondu,
je vais passer pour un nul mais, C'est à dire ?
il faut faire un imports je suppose ? lequelle ?
Hello,
Voici un exemple:
1. Créer une form (form1)
2. Mettre un label sur la form (label1)
3. Ajouter à ton projet le composant "Microsoft Internet
Controls"
4. placer ce composant sur ta feuille (Webbrowser1)
5. Mettre dans la propriété Caption de ton label l'URL
que tu veux atteindre
6. Mettre le code qui convient dans label1_click
(Le "Navigate" dont parlait François)
voici le programme en entier:
---------------------------------------------
Option Explicit
Private Sub Command1_Click()
End Sub
Private Sub Form_Load()
Label1.Caption = "http://www.google.fr"
End Sub
Private Sub Label1_Click()
WebBrowser1.Navigate (Label1.Caption)
End Sub
--------------------------------------------------------
Mais, (c'est le dernière question :)- je vous promet), je souhaiterez afficher dans cet élément une page HTM se trouvant DANS mon application et non sur le web !
Merci pour toute vos aide qui me sont vraiment précieuse ;) et Bonne fêtes de fin d'année a TOUS ;)
-----Message d'origine----- "Gillou" a écrit
dans le message de
news:049201c3c7aa$eea25690$ Merci de m'avoir répondu, je vais passer pour un nul mais, C'est à dire ? il faut faire un imports je suppose ? lequelle ?
Hello,
Voici un exemple:
1. Créer une form (form1) 2. Mettre un label sur la form (label1) 3. Ajouter à ton projet le composant "Microsoft Internet
Controls"
4. placer ce composant sur ta feuille (Webbrowser1) 5. Mettre dans la propriété Caption de ton label l'URL
que tu veux atteindre
6. Mettre le code qui convient dans label1_click (Le "Navigate" dont parlait François)
voici le programme en entier: --------------------------------------------- Option Explicit
Private Sub Command1_Click()
End Sub
Private Sub Form_Load() Label1.Caption = "http://www.google.fr" End Sub
Private Sub Label1_Click() WebBrowser1.Navigate (Label1.Caption) End Sub --------------------------------------------------------
.
François Picalausa
"Gillou" a écrit dans le message de news:055001c3c7c0$e4b066c0$
Merci beaucoup ;)
Mais, (c'est le dernière question :)- je vous promet), je souhaiterez afficher dans cet élément une page HTM se trouvant DANS mon application et non sur le web !
Merci pour toute vos aide qui me sont vraiment précieuse ;) et Bonne fêtes de fin d'année a TOUS ;)
Bonjour/soir,
Si ton fichier se trouve dans les ressources, tu peux n'en reprendre que la partie qui se trouve dans body et, dans ton webbrowser, utiliser quelquechose comme:
"Gillou" <anonymous@discussions.microsoft.com> a écrit dans le message
de news:055001c3c7c0$e4b066c0$a301280a@phx.gbl
Merci beaucoup ;)
Mais, (c'est le dernière question :)- je vous promet), je
souhaiterez afficher dans cet élément une page HTM se
trouvant DANS mon application et non sur le web !
Merci pour toute vos aide qui me sont vraiment
précieuse ;) et Bonne fêtes de fin d'année a TOUS ;)
Bonjour/soir,
Si ton fichier se trouve dans les ressources, tu peux n'en reprendre que la
partie qui se trouve dans body et, dans ton webbrowser, utiliser
quelquechose comme:
"Gillou" a écrit dans le message de news:055001c3c7c0$e4b066c0$
Merci beaucoup ;)
Mais, (c'est le dernière question :)- je vous promet), je souhaiterez afficher dans cet élément une page HTM se trouvant DANS mon application et non sur le web !
Merci pour toute vos aide qui me sont vraiment précieuse ;) et Bonne fêtes de fin d'année a TOUS ;)
Bonjour/soir,
Si ton fichier se trouve dans les ressources, tu peux n'en reprendre que la partie qui se trouve dans body et, dans ton webbrowser, utiliser quelquechose comme:
j'ai été obliger le mettre comme sa pour qu'il n'y ai pas d'erreur => Webbrowser1.Document.Write.LoadResString(ID_PAGE_HTML) et ID_PAGE_HTML est detecter comme erreur. alor j'ai mis => nomdelapagehtm.htm (car c'est du htm) mais c'est une erreur également ! Quel erreur ai je fait ?
-----Message d'origine----- "Gillou" a écrit
dans le message
de news:055001c3c7c0$e4b066c0$
Merci beaucoup ;)
Mais, (c'est le dernière question :)- je vous promet),
je
souhaiterez afficher dans cet élément une page HTM se trouvant DANS mon application et non sur le web !
Merci pour toute vos aide qui me sont vraiment précieuse ;) et Bonne fêtes de fin d'année a TOUS ;)
Bonjour/soir,
Si ton fichier se trouve dans les ressources, tu peux
n'en reprendre que la
partie qui se trouve dans body et, dans ton webbrowser,
j'ai été obliger le mettre comme sa pour qu'il n'y ai pas
d'erreur =>
Webbrowser1.Document.Write.LoadResString(ID_PAGE_HTML)
et ID_PAGE_HTML est detecter comme erreur. alor j'ai mis
=> nomdelapagehtm.htm (car c'est du htm)
mais c'est une erreur également ! Quel erreur ai je fait ?
-----Message d'origine-----
"Gillou" <anonymous@discussions.microsoft.com> a écrit
dans le message
de news:055001c3c7c0$e4b066c0$a301280a@phx.gbl
Merci beaucoup ;)
Mais, (c'est le dernière question :)- je vous promet),
je
souhaiterez afficher dans cet élément une page HTM se
trouvant DANS mon application et non sur le web !
Merci pour toute vos aide qui me sont vraiment
précieuse ;) et Bonne fêtes de fin d'année a TOUS ;)
Bonjour/soir,
Si ton fichier se trouve dans les ressources, tu peux
n'en reprendre que la
partie qui se trouve dans body et, dans ton webbrowser,
j'ai été obliger le mettre comme sa pour qu'il n'y ai pas d'erreur => Webbrowser1.Document.Write.LoadResString(ID_PAGE_HTML) et ID_PAGE_HTML est detecter comme erreur. alor j'ai mis => nomdelapagehtm.htm (car c'est du htm) mais c'est une erreur également ! Quel erreur ai je fait ?
-----Message d'origine----- "Gillou" a écrit
dans le message
de news:055001c3c7c0$e4b066c0$
Merci beaucoup ;)
Mais, (c'est le dernière question :)- je vous promet),
je
souhaiterez afficher dans cet élément une page HTM se trouvant DANS mon application et non sur le web !
Merci pour toute vos aide qui me sont vraiment précieuse ;) et Bonne fêtes de fin d'année a TOUS ;)
Bonjour/soir,
Si ton fichier se trouve dans les ressources, tu peux
n'en reprendre que la
partie qui se trouve dans body et, dans ton webbrowser,
a écrit dans le message de news:051501c3c7d7$594fbd80$
j'ai été obliger le mettre comme sa pour qu'il n'y ai pas d'erreur => Webbrowser1.Document.Write.LoadResString(ID_PAGE_HTML) et ID_PAGE_HTML est detecter comme erreur. alor j'ai mis => nomdelapagehtm.htm (car c'est du htm) mais c'est une erreur également ! Quel erreur ai je fait ?
Bonjour/soir,
ID_PAGE_HTML représente l'ID de la chaine dans les ressources. Par exemple Webbrowser1.Document.Write LoadResString(101) Il ne faut pas de point entre Write et LoadResString Write écrit dans le document et LoadResString est une fonction interne de VB qui récupère la chaine dans le fichier de ressources.
<anonymous@discussions.microsoft.com> a écrit dans le message de
news:051501c3c7d7$594fbd80$a601280a@phx.gbl
j'ai été obliger le mettre comme sa pour qu'il n'y ai pas
d'erreur =>
Webbrowser1.Document.Write.LoadResString(ID_PAGE_HTML)
et ID_PAGE_HTML est detecter comme erreur. alor j'ai mis
=> nomdelapagehtm.htm (car c'est du htm)
mais c'est une erreur également ! Quel erreur ai je fait ?
Bonjour/soir,
ID_PAGE_HTML représente l'ID de la chaine dans les ressources.
Par exemple
Webbrowser1.Document.Write LoadResString(101)
Il ne faut pas de point entre Write et LoadResString
Write écrit dans le document et LoadResString est une fonction interne de VB
qui récupère la chaine dans le fichier de ressources.
a écrit dans le message de news:051501c3c7d7$594fbd80$
j'ai été obliger le mettre comme sa pour qu'il n'y ai pas d'erreur => Webbrowser1.Document.Write.LoadResString(ID_PAGE_HTML) et ID_PAGE_HTML est detecter comme erreur. alor j'ai mis => nomdelapagehtm.htm (car c'est du htm) mais c'est une erreur également ! Quel erreur ai je fait ?
Bonjour/soir,
ID_PAGE_HTML représente l'ID de la chaine dans les ressources. Par exemple Webbrowser1.Document.Write LoadResString(101) Il ne faut pas de point entre Write et LoadResString Write écrit dans le document et LoadResString est une fonction interne de VB qui récupère la chaine dans le fichier de ressources.
VB me transforme Webbrowser1.Document.Write LoadResString (101) en => Webbrowser1.Document.Write(LoadResString(101)) ? Et Comment détermine t'on l'ID du document choisi ?
-----Message d'origine----- a écrit dans le
message de
news:051501c3c7d7$594fbd80$
j'ai été obliger le mettre comme sa pour qu'il n'y ai
pas
d'erreur => Webbrowser1.Document.Write.LoadResString(ID_PAGE_HTML) et ID_PAGE_HTML est detecter comme erreur. alor j'ai
mis
=> nomdelapagehtm.htm (car c'est du htm) mais c'est une erreur également ! Quel erreur ai je
fait ?
Bonjour/soir,
ID_PAGE_HTML représente l'ID de la chaine dans les
ressources.
Par exemple Webbrowser1.Document.Write LoadResString(101) Il ne faut pas de point entre Write et LoadResString Write écrit dans le document et LoadResString est une
fonction interne de VB
qui récupère la chaine dans le fichier de ressources.
VB me transforme Webbrowser1.Document.Write LoadResString
(101) en => Webbrowser1.Document.Write(LoadResString(101))
? Et Comment détermine t'on l'ID du document choisi ?
-----Message d'origine-----
<anonymous@discussions.microsoft.com> a écrit dans le
message de
news:051501c3c7d7$594fbd80$a601280a@phx.gbl
j'ai été obliger le mettre comme sa pour qu'il n'y ai
pas
d'erreur =>
Webbrowser1.Document.Write.LoadResString(ID_PAGE_HTML)
et ID_PAGE_HTML est detecter comme erreur. alor j'ai
mis
=> nomdelapagehtm.htm (car c'est du htm)
mais c'est une erreur également ! Quel erreur ai je
fait ?
Bonjour/soir,
ID_PAGE_HTML représente l'ID de la chaine dans les
ressources.
Par exemple
Webbrowser1.Document.Write LoadResString(101)
Il ne faut pas de point entre Write et LoadResString
Write écrit dans le document et LoadResString est une
fonction interne de VB
qui récupère la chaine dans le fichier de ressources.
VB me transforme Webbrowser1.Document.Write LoadResString (101) en => Webbrowser1.Document.Write(LoadResString(101)) ? Et Comment détermine t'on l'ID du document choisi ?
-----Message d'origine----- a écrit dans le
message de
news:051501c3c7d7$594fbd80$
j'ai été obliger le mettre comme sa pour qu'il n'y ai
pas
d'erreur => Webbrowser1.Document.Write.LoadResString(ID_PAGE_HTML) et ID_PAGE_HTML est detecter comme erreur. alor j'ai
mis
=> nomdelapagehtm.htm (car c'est du htm) mais c'est une erreur également ! Quel erreur ai je
fait ?
Bonjour/soir,
ID_PAGE_HTML représente l'ID de la chaine dans les
ressources.
Par exemple Webbrowser1.Document.Write LoadResString(101) Il ne faut pas de point entre Write et LoadResString Write écrit dans le document et LoadResString est une
fonction interne de VB
qui récupère la chaine dans le fichier de ressources.
"Gillou" a écrit dans le message de news:055b01c3c885$7695cc00$
VB me transforme Webbrowser1.Document.Write LoadResString (101) en => Webbrowser1.Document.Write(LoadResString(101)) ? Et Comment détermine t'on l'ID du document choisi ?
Bonjour/soir,
Faisons le en pas à pas pour que tu puisse t'en sortir ;-)
1. Crée un nouveau projet Exe standard 2. Dans le menu complément, Gestionnaire de compléments, vérifie que VB6 resources editor est bien chargé. Si tel est le cas, il devrait y avoir une icône représentant une main déposant un cube pour compléter un cube vert plus grand. 3. Click sur cette icône : l'éditeur de ressources apparait 4. Ouvre ton document html à l'aide d'un éditeur permettant de visualiser la source (par exemple, le bloc notes). 5. Copie la partie du document incluse entre les balises <body> et </body> 6. Dans VB, dans l'éditeur de ressources, click sur "éditer les tables de chaines" (l'icône abc) 7. Une fenêtre "Editeur de tables de chaines" (edit string tables; je n'ai pas la VF d'installée) apparait. Il y a déjà un ID pré ajouté dedans, à savoir, 101. 8. Click dans la colonne Français (France), à côté de 101, pour entrer en mode édition. 9. Colle le texte qui avait été copié 10. Dans la boite à outil du formulaire ajouté par défaut, click avec le boutton droit et sélectionne composants... 11. Coche Microsoft Internet Controls et click sur OK 12. Ajoute un composant WebBrowser sur la feuille. 13. Entre en mode édition de code pour cette feuille. 14. Remplace le code existant éventuel par ceci: Option Explicit
Private Const RESSTRING_ID_DOCUMENT1 = 101
Private Sub Form_Load() WebBrowser1.Navigate "about: blank" End Sub
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant) WebBrowser1.Document.Write LoadResString(RESSTRING_ID_DOCUMENT1) End Sub
15. Enregistre le tout, presse play et pense qu'on pourrait ajouter un second document simplement en ajoutant un ID. Dans l'éditeur de tables de chaiens, il s'agit juste de sélectionner une cellule de la ligne ayant pour ID 101 et de presser Enter, coller le code HTML, ... Dans le code, il suffit de changer le document qu'on veut charger en changeant la ligne LoadResString.
"Gillou" <anonymous@discussions.microsoft.com> a écrit dans le message
de news:055b01c3c885$7695cc00$a601280a@phx.gbl
VB me transforme Webbrowser1.Document.Write LoadResString
(101) en => Webbrowser1.Document.Write(LoadResString(101))
? Et Comment détermine t'on l'ID du document choisi ?
Bonjour/soir,
Faisons le en pas à pas pour que tu puisse t'en sortir ;-)
1. Crée un nouveau projet Exe standard
2. Dans le menu complément, Gestionnaire de compléments, vérifie que VB6
resources editor est bien chargé. Si tel est le cas, il devrait y avoir une
icône représentant une main déposant un cube pour compléter un cube vert
plus grand.
3. Click sur cette icône : l'éditeur de ressources apparait
4. Ouvre ton document html à l'aide d'un éditeur permettant de visualiser la
source (par exemple, le bloc notes).
5. Copie la partie du document incluse entre les balises <body> et </body>
6. Dans VB, dans l'éditeur de ressources, click sur "éditer les tables de
chaines" (l'icône abc)
7. Une fenêtre "Editeur de tables de chaines" (edit string tables; je n'ai
pas la VF d'installée) apparait.
Il y a déjà un ID pré ajouté dedans, à savoir, 101.
8. Click dans la colonne Français (France), à côté de 101, pour entrer en
mode édition.
9. Colle le texte qui avait été copié
10. Dans la boite à outil du formulaire ajouté par défaut, click avec le
boutton droit et sélectionne composants...
11. Coche Microsoft Internet Controls et click sur OK
12. Ajoute un composant WebBrowser sur la feuille.
13. Entre en mode édition de code pour cette feuille.
14. Remplace le code existant éventuel par ceci:
Option Explicit
Private Const RESSTRING_ID_DOCUMENT1 = 101
Private Sub Form_Load()
WebBrowser1.Navigate "about: blank"
End Sub
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As
Variant)
WebBrowser1.Document.Write LoadResString(RESSTRING_ID_DOCUMENT1)
End Sub
15. Enregistre le tout, presse play et pense qu'on pourrait ajouter un
second document simplement en ajoutant un ID.
Dans l'éditeur de tables de chaiens, il s'agit juste de sélectionner une
cellule de la ligne ayant pour ID 101 et de presser Enter, coller le code
HTML, ...
Dans le code, il suffit de changer le document qu'on veut charger en
changeant la ligne LoadResString.
"Gillou" a écrit dans le message de news:055b01c3c885$7695cc00$
VB me transforme Webbrowser1.Document.Write LoadResString (101) en => Webbrowser1.Document.Write(LoadResString(101)) ? Et Comment détermine t'on l'ID du document choisi ?
Bonjour/soir,
Faisons le en pas à pas pour que tu puisse t'en sortir ;-)
1. Crée un nouveau projet Exe standard 2. Dans le menu complément, Gestionnaire de compléments, vérifie que VB6 resources editor est bien chargé. Si tel est le cas, il devrait y avoir une icône représentant une main déposant un cube pour compléter un cube vert plus grand. 3. Click sur cette icône : l'éditeur de ressources apparait 4. Ouvre ton document html à l'aide d'un éditeur permettant de visualiser la source (par exemple, le bloc notes). 5. Copie la partie du document incluse entre les balises <body> et </body> 6. Dans VB, dans l'éditeur de ressources, click sur "éditer les tables de chaines" (l'icône abc) 7. Une fenêtre "Editeur de tables de chaines" (edit string tables; je n'ai pas la VF d'installée) apparait. Il y a déjà un ID pré ajouté dedans, à savoir, 101. 8. Click dans la colonne Français (France), à côté de 101, pour entrer en mode édition. 9. Colle le texte qui avait été copié 10. Dans la boite à outil du formulaire ajouté par défaut, click avec le boutton droit et sélectionne composants... 11. Coche Microsoft Internet Controls et click sur OK 12. Ajoute un composant WebBrowser sur la feuille. 13. Entre en mode édition de code pour cette feuille. 14. Remplace le code existant éventuel par ceci: Option Explicit
Private Const RESSTRING_ID_DOCUMENT1 = 101
Private Sub Form_Load() WebBrowser1.Navigate "about: blank" End Sub
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant) WebBrowser1.Document.Write LoadResString(RESSTRING_ID_DOCUMENT1) End Sub
15. Enregistre le tout, presse play et pense qu'on pourrait ajouter un second document simplement en ajoutant un ID. Dans l'éditeur de tables de chaiens, il s'agit juste de sélectionner une cellule de la ligne ayant pour ID 101 et de presser Enter, coller le code HTML, ... Dans le code, il suffit de changer le document qu'on veut charger en changeant la ligne LoadResString.
