Bonjour
j'aimerai savoir si il ya moyen de fair un bouton dans visual basic qui ouvrirai l'explorer a un endroit donné par exemple "mes documents"? si oui pouvez vous mexpliquer avec quoi et commen faire...
merci
Bonjour
j'aimerai savoir si il ya moyen de fair un bouton dans visual basic qui ouvrirai l'explorer a un endroit donné par exemple "mes documents"? si oui pouvez vous mexpliquer avec quoi et commen faire...
merci
S'il s'agit simplement d'ouvrir l'explorateur :
Tu peux le faire en appelant le Shell (voir aide en ligne).
Fais attention à la syntaxe : explorer.exe ton_chemin_répertoire
et à la façon d'ouvrir la fenêtre (paramètre à fixer)
Il ne s'agit là que de ce qu'il convient de définir dans l'appel du Shell. Pour la syntaxe totale : voir dans l'aide en ligne comment appeler le Shell
bonsoir
ci joint quelques exemples possibles
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 Private Sub Command1_Click() 'necessite d'activer reference Microsoft Shell Controls and Automation Dim objShell As Shell Set objShell = New Shell objShell.Explore ("C:\Documents and Settings") End Sub
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 Private Sub Command2_Click() Shell "explorer.exe C:\Documents and Settings", vbMaximizedFocus ' adapter le chemin End Sub
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 Private Sub Command3_Click() Dim IE As Object Set IE = CreateObject("internetExplorer.Application") IE.Navigate "C:\Documents and Settings" IE.Visible = True End Sub
bonne soiree
michel
rebonsoir
effectivement "Shell" est plus court ...;o)
un exemple pour récupérer le chemin de "Mes documents"
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Const Cible = &H5 'Mes Documents Dim objShell As Object Dim objFolder As Object, objFolderItem As Object Set objShell = CreateObject("Shell.Application") Set objFolder = objShell.NameSpace(Cible) Set objFolderItem = objFolder.Self MsgBox objFolderItem.Path
bonne soiree
michel
Afficher un explorateur de dossier, c'est possible http://vb.developpez.com/faq/?page=Fichiers#select_rep
Quant à le faire ouvrir sur un répertoire donné, c'est une autre histoire![]()
perso, je me suis fait mon propre ocx, car j'ai jamais trouvé d'autre solution
Si elle existe je suis preneur aussi![]()
chez moi, ceci fonctionne sans problème
Si ton seul propos est d'ouvrir, par l'explorateur, un répertoire, voilà...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 Private Sub Command1_Click() nimportequoi = Shell("explorer.exe C:\Documents and Settings\marques\Mes documents", 3) End Sub
Si par contre, tu veux n'afficher que des fichiers d'un type donné, en sélectionner un pour utiliser son chemin d'accès, etc..., c'est une autre paire de manches et il y a d'autres méthodes. A toi de nous dire ce que tu veux faire, donc.
j'ai peut-etre mal interpreté la question (à force d'être obligé de lire entre les lignes)
s'il ne sagit que d'ouvrir l'explorateur Windows, alors, oui, shell fonctionne très bien
Désolé, j'en étais pas là
Tu as raison, Thierry : tu anticipes...
Je sais que le demandeur veut autre chose, mais je souhaite qu'il le dise d'emblée plutôt que de "tourner autour du pot"...
Bonsoir à toi.![]()
Envoyé par SilkyRoad
Envoyé par jmfmarques
pour info c'est la même chose car :
vbMaximizedFocus = 3![]()
C'est sur, Bbil (je n'ai mis 3 que parce que c'était plus facile à frapper)...
Mais la différence est simplement dans la façon d'appeler :
toto = Shell("......") permet d'ouvrir et de récupérer la valable toto (en cas de besoin et si il utilise AppActivate), tandis que shell "......." ouvre mais ne récupère aucune variable.
le pot s'apellerais pas comon dialog?Envoyé par jmfmarques
salut![]()
Tout dépend de ce qu'il veut faire derrière...
et ya til moyen douvrir une application genre word excel ou autre?
Je crois (j'en suis plutôt certain) que les réponses précédentes, concernant l'appel du Shell, sont suffisantes. Si tu ouvres l'aide en ligne, de surcroît, sur le mot SHELL et sur le mot APPACTIVATE tu auras précisément un exemple qui correspond on ne peut mieux à tes souhaits.
excusez moi je savai pas que sa pouvai fonctionné pour cela aussi je te remerci
mai g pas compris commen je pouvai ouvrir excel en cliquan sur un bouton dans visual basic...
Montre-nous le code trouvé dans l'exemple de l'aide en ligne pour APPACTIVATE (car tu l'as au moins lu, cet exemple, non ?)
le code déduit de cet exemple est à mettre dans l'événement click de ton bouton.
mai l'aide en ligne tu parle bien de celui dans visual basic? parce que si c celui la moi g rien qui mexplique APPACTIVATE ou alors j'ai louper qqch
frappe appactivate quelque-part dans ton code, sélectionne ce mot, appuie sur la touche F1 puis lis. Clique ensuite sur l'onglet exemple et dis-nous ce que tu y vois (ou n'y vois pas si, comme je le pense, tu n'as pas l'aide en ligne)
c qqch comme sa que je doi mettre alors?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 Private Sub Command1_Click() Dim MyAppID, ReturnValue AppActivate "Microsoft Word" End Sub
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager