shellwindows et webbrowser
Suite à la discussion : shellexecute ne me prend pas le handle
bonjour je suis très intéressé par votre conversation
je ne comprends pas la réponse
Citation:
Citation:
Envoyé par iris15
par contre Microsoft VB me reconnait pas ces objets (shellwindows et webbrowser)
réponse par darkvader
Il faut une référence à Microsoft Internet Control.
Tu parlais dans ton 1er post de page IE, j'ai donc extrapolé en pensant que la déclaration était existante.
pourrais tu m'expliquer exactement ce qu'il faut ajouter pour (shellwindows et webbrowser) soit reconnu
j'ouvre mes fenetres internet comme ceci
Code:
1
2
3
4
|
Public Sub OuvreUrl(ByVal sFile As String, Optional ByVal sParameters As String = vbNullString)
ShellExecute 0&, "open", sFile, sParameters, vbNullString, 1&
End Sub |
et j'ouvre 7 fenêtres que je voudrais récupérer leur handle ainsi
Code:
1
2
3
4
5
6
7
8
9
10
11
|
Public Sub AfficheUrl(Mot As String)
OuvreUrl "http://dictionnaire.mediadico.com/traduction/dictionnaire.asp/definition/" & Mot & "/2007"
Sleep (2000)
OuvreUrl "http://francois.gannaz.free.fr/Littre/xmlittre.php?rand=&requete=" & Mot
OuvreUrl "http://free.mediadico.com/dictionnaire.asp/definition/" & Mot & "/dictionnaire"
OuvreUrl "http://atilf.atilf.fr/dendien/scripts/fast.exe?mot=" & Mot
OuvreUrl "http://dictionnaire.sensagent.com/" & Mot & "/fr-fr/"
OuvreUrl "http://dictionnaire.tv5.org/dictionnaires.asp?Action=1&mot=" & Mot & "&che=1"
OuvreUrl "http://fr.wiktionary.org/wiki/" & LCase(Mot)
End Sub |
