[AC-2003] Ouvrir une fenêtre "explorer" à partir d'une zone de liste

[mploki]

Bonjour à tous,

Ayant cherché sur internet, comment ouvrir une page internet via access et n'ayant pas trouvé grand chose, je m'adresse à vous pour avoir un peu d'aide...

Je désire tout simplement ouvrir une page internet explorer (google.fr) en cliquant sur une des lignes de ma zone de liste. En fonction de la ligne sélectionnée, la page internet recherche une information contenue dans une des colonnes de cette ligne choisie.

J'ai éssayé un: ShellExecute mais ca ne me donne rien

Merci par avance de vos conseils

[helas]

Bonsoir,
Voici pour internet explorer

Code :

1
2
3
4
5
6
7
8
9
 
Private Sub ZoneDeListe_Click()
 Dim s As String, r As Long
 s = Me!ZoneDeListe.Column(1)
 
 url = "http://www.google.fr/#hl=fr&xhr=t&q=" & s
 r = Shell("C:\Program Files\Internet Explorer\iexplore.exe " & url)
 
End Sub

On récupère la donnée de la zone de liste (ici la colonne 1 = 2ème colonne)
On crée l'URL avec ce paramètre (contenu dans la variable s)
puis on lance Internet explorer avec cette URL
J'ai testé et ça fonctionne.

[mploki]

Merci beaucoup effectivement ca fonctionne parfaitement.

Juste, aurais tu une astuce pour que la fenêtre internet s'ouvre au premier plan?

Encore Merci

[ClaudeLELOUP]

Bonjour mploki,


Dans le code de helas (que je salue pour sa réponse !), remplace

Code :

r = Shell("C:\Program Files\Internet Explorer\iexplore.exe " & url)

par ceci :

Code :

Shell ("C:\Program Files\Internet Explorer\iexplore.exe " & url), vbNormalFocus

Dans l'aide Access (F1) à la rubrique "Shell", tu trouveras la liste des options possibles.