Shell "search?hl=fr&q="

Signaler
Messages postés
157
Date d'inscription
dimanche 18 avril 2004
Statut
Membre
Dernière intervention
25 juillet 2018
-
Messages postés
6786
Date d'inscription
vendredi 16 décembre 2005
Statut
Membre
Dernière intervention
21 décembre 2011
-
Bonjour, je cherche un moyen d'ouvrire une page internet avec le lien si dessous :

http://www.google.fr/search?hl=fr&q=

avec par la suite le texte d'un textbox :

http://www.google.fr/search?hl=fr&q=(text1.text)

Pour effectuer cette action j'écrit :

shell "explorer.exe http://www.google.fr/search?hl=fr&q=" & Text1.Text

mais les caractére "search?hl=fr&q=" ne passe pas !

si je marque :

shell "explorer.exe http://www.google.fr/" & Text1.Text

la sa fonctionne !

Comment faire pour que  "search?hl=fr&q=" soit pris en compt ?

3 réponses

Messages postés
1241
Date d'inscription
mardi 10 octobre 2006
Statut
Membre
Dernière intervention
27 août 2013
6
Salut,

Utilise plutot Shellexecute qui utilise le navigateur par défaut sans avoir à spécifier son emplacement.
Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Dim url as string
url = "http://www.google.fr" & Text1.text
ShellExecute(0, "open", url , vbNullString, vbNullString, vbNormalFocus)
Messages postés
1241
Date d'inscription
mardi 10 octobre 2006
Statut
Membre
Dernière intervention
27 août 2013
6
Re excuse ,
j'ai oublié
url= "http://www.google.fr/search?hl&q=" & Text1.text
Messages postés
6786
Date d'inscription
vendredi 16 décembre 2005
Statut
Membre
Dernière intervention
21 décembre 2011
18
salut,

oui, préférer l'utilisation de ShellExecute.
Pour info, avec Shell tu ne peux qu'éxécuter des exécutables (*.exe), rien d'autres, sauf en précisant l'appli à lancer

@++

<hr width="100%" size="2" />( Nouveau forum : Exclusivement Office & VBA/STRONG>