Discussion :

[Fraise']

Bonjour à tous, je pense que le titre est assez explicite mais je vais être plus claire :
J'ai un programme avec un filelistbox, j'aimerais que lorsque je séléctionne dans la liste un fichier et que je clik sur un bouton ouvrir par exemple, le fichier s'ouvrirais ( pareil pour le suprimer).
Quelqu'un a une solution?
Merci d'avance smile.gif
Fraise'

[SfJ5Rpw8]

bonjour et bienvenue sur le forum ...

merci de préciser ce que tu entends par "ouvrir un fichier" .. ..l'ouvir ..ou ..?

[Fraise']

eh bien par exemple j'ai un fichier (qui peut etre .pdf ; .txt ; .exe etc...) Je voudrais que lorseque je clique sur le bouton ouvrir, il m'ouvre le fichier selectionné dans la liste.

[SfJ5Rpw8]

pour cela utilise l'API shellexecute... ..

voir

Comment ouvrir un fichier HTML, Word ou autre en utilisant l'exécutable associé ?


PS: Sinon tu ne m'as toujours pas répondu à la question "qu'entends tu pas ouvrir un fichier ? " , j'ai considéré que tu voulai l'ouvrir dans le logiciel approprié

[zazaraignée]

Salut

As-tu jeté un oeil aux tutoriels? Plus particulièrement celui sur la gestion des fichiers?

[Fraise']

Merci, je pense que ça va grandement m'aider mais par contre, comment récupérer la variable de la liste? (selection du fichier : ouvrir) ?

[SfJ5Rpw8]

c'est dans la suite du tutoriel proposé par zaza...

ici

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5

Dim SelectedFile As String
'L'utilisateur a sélectionné l' objet
SelectedFile = File1.Path & "\" & File1.FileName

[Fraise']

Merci Merci Merci!
Mais encore un problème : "Placez cette déclaration dans le module d'une form :" C.a.d?

[SfJ5Rpw8]

il doit sagir de la feuille de code associé à ta form.. tu double click sur la form.. et tu te retrouve dans ce code...

[Fraise']

Merci, j'arrive à ouvrir l'adress de mon site.
Je lis les cours sur les fichiers et je vous tiens au courant
Merci :

[Fraise']

Bon il y a un truc que je comprend pas :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub Command1_Click()
ShellExecute Me.hwnd, "open", "Nom de fichier", "", App.Path, 1
End Sub

Que faut-il mettre à la place de "Nom de fichier" pour que ça ouvre le fichier selectionné dans la liste?

[SfJ5Rpw8]

ben le nom de fichier .... (voir précédent message..) si ton, contrôle filelistbox se nomme file1 cela donne...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
ShellExecute Me.hwnd, "open", File1.Path & "\" & File1.FileName, "", App.Path, 1

[Fraise']

Ca marche !!!!
Merci beaucoup !!!!!!
Bon maintenant que j'ai quelques maigres bases je vais pouvoir me débrouiller tout seul

Bonne soirée !
@++