OVH Cloud OVH Cloud

ouvrir l'explorateur de windows depuis access

6 réponses
Avatar
stephane G
je voudrais cr=E9er un bouton dans un formulaire qui=20
permettrait d'ouvrir l'explorateur windows =E0 un endroit=20
d=E9fini.

J'ai cr=E9er un bouton qui ouvre EXPLORER mais je ne sais=20
pas comment lui imposer de l'ouvrir directement dans un=20
repertoir bien particuli=E9

merci=20

steph

6 réponses

Avatar
Jeff
Bonjour

A tout hasard tu peux essayer d'exécuter la commande suivante :

"C:WINDOWSEXPLORER.EXE /n,/e,C:" (sans guillemets)
qui est le raccourci utilisé dans la barre de lancement rapide de Windows
pour ouvrir l'explorateur de fichier sur C: (racine)

Cordialement

Jeff

Charte du forum: http://users.skynet.be/mpfa/charte.htm
"stephane G" a écrit dans le message de
news:08ce01c35040$fc601470$
je voudrais créer un bouton dans un formulaire qui
permettrait d'ouvrir l'explorateur windows à un endroit
défini.

J'ai créer un bouton qui ouvre EXPLORER mais je ne sais
pas comment lui imposer de l'ouvrir directement dans un
repertoir bien particulié

merci

steph
Avatar
stephane G
super ce marche

merci pour tout

stephane
-----Message d'origine-----
Bonjour

A tout hasard tu peux essayer d'exécuter la commande
suivante :


"C:WINDOWSEXPLORER.EXE /n,/e,C:" (sans guillemets)
qui est le raccourci utilisé dans la barre de lancement
rapide de Windows

pour ouvrir l'explorateur de fichier sur C: (racine)

Cordialement

Jeff

Charte du forum: http://users.skynet.be/mpfa/charte.htm
"stephane G" a écrit dans le
message de

news:08ce01c35040$fc601470$
je voudrais créer un bouton dans un formulaire qui
permettrait d'ouvrir l'explorateur windows à un endroit
défini.

J'ai créer un bouton qui ouvre EXPLORER mais je ne sais
pas comment lui imposer de l'ouvrir directement dans un
repertoir bien particulié

merci

steph


.



Avatar
Benoit Compoint
Bonjour,

Apparemment personne n'a répondu à cette question.
Mieux vaut tard que jamais ?
L'exemple ci-dessous fonctionne correctement sur ma station Windows XP :

Private Sub Command0_Click()
Shell "explorer C:Program FilesMicrosoft OfficeOffice10", vbNormalFocus
End Sub

Benoît Compoint.

"stephane G" wrote in message
news:08ce01c35040$fc601470$
je voudrais créer un bouton dans un formulaire qui
permettrait d'ouvrir l'explorateur windows à un endroit
défini.

J'ai créer un bouton qui ouvre EXPLORER mais je ne sais
pas comment lui imposer de l'ouvrir directement dans un
repertoir bien particulié

merci

steph
Avatar
Guy Detienne
Salut ;O)

En effet mieux vaut tard que jamais...
Mais ton exemple n'est pas sûr car tu 'hardcodes' le chemin, ce qui n'est
jamais bon...
Ca marchera pour toi et ton système, mais par forcément sur un autre.

Une aute façon de faire qui marchera à tous coups:

A placer dans un formulaire :

Private 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
Const SW_SHOWNORMAL = 1

Private Sub Commande0_Click()
ShellExecute Me.hwnd, vbNullString, "iexplore", vbNullString, "C:",
SW_SHOWNORMAL
End Sub

Voilà...

Tchao

Guy DETIENNE

--
___________________________________
Tchao.net: L'informatique à votre dimension
http://www.tchao.net
Veuillez répondre dans le newsgroup afin d'en faire bénéficier tout le
monde.
Please reply only to the newsgroup so that others can benefit.
___________________________________
Visual Basic & Microsoft Access
http://www.vbfrance.com
http://www.mvps.org/access
http://www.mvps.org/vbnet
___________________________________

"Benoit Compoint" a écrit dans le message de
news:
Bonjour,

Apparemment personne n'a répondu à cette question.
Mieux vaut tard que jamais ?
L'exemple ci-dessous fonctionne correctement sur ma station Windows XP :

Private Sub Command0_Click()
Shell "explorer C:Program FilesMicrosoft OfficeOffice10", vbNormalFocus
End Sub

Benoît Compoint.

"stephane G" wrote in message
news:08ce01c35040$fc601470$
je voudrais créer un bouton dans un formulaire qui
permettrait d'ouvrir l'explorateur windows à un endroit
défini.

J'ai créer un bouton qui ouvre EXPLORER mais je ne sais
pas comment lui imposer de l'ouvrir directement dans un
repertoir bien particulié

merci

steph




Avatar
snack
Bonjour Guy,

Je pense que tu as mal lu la question de Stephane.... qui était "ouvrir
l'explorateur windows à un endroit"....
C'est ce que fait Benoit en ouvrant l'explorateur sur le dossier Office à
titre d'exemple.
Non ?
--
snack
Utiliser microsoft.public.fr.access...
http://users.skynet.be/mpfa/charte.htm


"Guy Detienne" a écrit dans le message news:

Salut ;O)

En effet mieux vaut tard que jamais...
Mais ton exemple n'est pas sûr car tu 'hardcodes' le chemin, ce qui n'est
jamais bon...
Ca marchera pour toi et ton système, mais par forcément sur un autre.

Une aute façon de faire qui marchera à tous coups:

A placer dans un formulaire :

Private 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
Const SW_SHOWNORMAL = 1

Private Sub Commande0_Click()
ShellExecute Me.hwnd, vbNullString, "iexplore", vbNullString, "C:",
SW_SHOWNORMAL
End Sub

Voilà...

Tchao

Guy DETIENNE

--
___________________________________
Tchao.net: L'informatique à votre dimension
http://www.tchao.net
Veuillez répondre dans le newsgroup afin d'en faire bénéficier tout le
monde.
Please reply only to the newsgroup so that others can benefit.
___________________________________
Visual Basic & Microsoft Access
http://www.vbfrance.com
http://www.mvps.org/access
http://www.mvps.org/vbnet
___________________________________

"Benoit Compoint" a écrit dans le message
de

news:
Bonjour,

Apparemment personne n'a répondu à cette question.
Mieux vaut tard que jamais ?
L'exemple ci-dessous fonctionne correctement sur ma station Windows XP :

Private Sub Command0_Click()
Shell "explorer C:Program FilesMicrosoft OfficeOffice10",
vbNormalFocus


End Sub

Benoît Compoint.

"stephane G" wrote in message
news:08ce01c35040$fc601470$
je voudrais créer un bouton dans un formulaire qui
permettrait d'ouvrir l'explorateur windows à un endroit
défini.

J'ai créer un bouton qui ouvre EXPLORER mais je ne sais
pas comment lui imposer de l'ouvrir directement dans un
repertoir bien particulié

merci

steph








Avatar
Jeff
Bonjour

La réponse a été donnée le 22 Juillet 2003

--- Copie ------------------------------------------------------------

Bonjour

A tout hasard tu peux essayer d'exécuter la commande suivante :

"C:WINDOWSEXPLORER.EXE /n,/e,C:" (sans guillemets)
qui est le raccourci utilisé dans la barre de lancement rapide de Windows
pour ouvrir l'explorateur de fichier sur C: (racine)

--- Fin Copie ------------------------------------------------------------

Cordialement

Jeff

Charte du forum: http://users.skynet.be/mpfa/charte.htm
"snack" a écrit dans le message de
news:
Bonjour Guy,

Je pense que tu as mal lu la question de Stephane.... qui était "ouvrir
l'explorateur windows à un endroit"....
C'est ce que fait Benoit en ouvrant l'explorateur sur le dossier Office à
titre d'exemple.
Non ?
--
snack
Utiliser microsoft.public.fr.access...
http://users.skynet.be/mpfa/charte.htm


"Guy Detienne" a écrit dans le message news:

Salut ;O)

En effet mieux vaut tard que jamais...
Mais ton exemple n'est pas sûr car tu 'hardcodes' le chemin, ce qui
n'est


jamais bon...
Ca marchera pour toi et ton système, mais par forcément sur un autre.

Une aute façon de faire qui marchera à tous coups:

A placer dans un formulaire :

Private 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
Const SW_SHOWNORMAL = 1

Private Sub Commande0_Click()
ShellExecute Me.hwnd, vbNullString, "iexplore", vbNullString, "C:",
SW_SHOWNORMAL
End Sub

Voilà...

Tchao

Guy DETIENNE

--
___________________________________
Tchao.net: L'informatique à votre dimension
http://www.tchao.net
Veuillez répondre dans le newsgroup afin d'en faire bénéficier tout le
monde.
Please reply only to the newsgroup so that others can benefit.
___________________________________
Visual Basic & Microsoft Access
http://www.vbfrance.com
http://www.mvps.org/access
http://www.mvps.org/vbnet
___________________________________

"Benoit Compoint" a écrit dans le message
de

news:
Bonjour,

Apparemment personne n'a répondu à cette question.
Mieux vaut tard que jamais ?
L'exemple ci-dessous fonctionne correctement sur ma station Windows XP
:




Private Sub Command0_Click()
Shell "explorer C:Program FilesMicrosoft OfficeOffice10",
vbNormalFocus


End Sub

Benoît Compoint.

"stephane G" wrote in message
news:08ce01c35040$fc601470$
je voudrais créer un bouton dans un formulaire qui
permettrait d'ouvrir l'explorateur windows à un endroit
défini.

J'ai créer un bouton qui ouvre EXPLORER mais je ne sais
pas comment lui imposer de l'ouvrir directement dans un
repertoir bien particulié

merci

steph