Shell "search?hl=fr&q="

Bonjour, je cherche un moyen d'ouvrire une page internet avec le lien si dessous :

[ Lien ]=

avec par la suite le texte d'un textbox :

[ Lien ]=(text1.text)

Pour effectuer cette action j'écrit :

shell "explorer.exe [ Lien ]=" & Text1.Text

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

si je marque :

shell "explorer.exe [ Lien ]" & Text1.Text

la sa fonctionne !

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

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 = " [ Lien ]" & Text1.text
ShellExecute(0, "open", url , vbNullString, vbNullString, vbNormalFocus)

Re excuse ,
j'ai oublié
url= " [ Lien ]/search?hl&q=" & Text1.text

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

@++

---

( Nouveau forum : Exclusivement Office & VBA/STRONG>