Discussion :

[Lechette]

Bonjour!

Je voudrais pouvoir explorer le contenu d'un dossier.
J'ai essayé plusieurs chose, et la seule qui ne m'affiche pas d'erreur est celle-ci:

Code :

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

1
2
3
4
5
Private Sub AideToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AideToolStripMenuItem.Click
        Dim path As String = IO.Path.Combine(My.Settings.Diruser, "_Game Switchers")
        FBD.SelectedPath = path
    End Sub
End Class

FBD étant une FolderBrowserDialog.

Le problème c'est que rien ne se passe quand on clique sur le AideToolStripMenuItem. Je ne trouve pas d'explication

Merci d'avance de votre aide

[Pol63]

tu ne fais qu'assigner des variables, c'est normal qu'il ne se passe rien de plus ...

pour connaitre le contenu d'un dossier, il faut utiliser system.io.directory.getfiles

[Lechette]

J'ai essayé plusieurs choses à chaque fois le message est

Erreur 1 Une valeur de type 'Tableau à 1 dimension(s) de String' ne peut pas être convertie en 'String'.

J'ai même tenté avec un truc tout simple:

Code :

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

1
2
Dim veau As String = IO.Path.Combine(My.Settings.Diruser, "_Game Switchers")
        MessageBox.Show(System.IO.Directory.GetFiles(veau))

Je veux juste que le répertoire s'ouvre pour que je puisse cliquer sur le fichier que je veux....

[Pol63]

pour le tableau de string qui peut pas etre converti en string, c'est assez explicite
tu as déclaré une variable as string, et tu as essayé d'y ranger un tableau de string
il fallait faire dim s() as string au lieu de dim s as string


System.IO.Directory.GetFiles sert à connaitre le noms des fichiers d'un dossier, pas à les afficher

MessageBox.Show affiche un string, rien de cliquable


bref je te conseillerais de lire ca : http://plasserre.developpez.com/vsommair.htm

car il suffit simplement de faire ShowDialog sur ton FolderBrowserDialog
enfin si c'est un fichier et pas un dossier que tu veux, c'est un OpenFileDialog qu'il te faut instanvier

[Lechette]

Merci de ton aide!!

J'ai fait ceci:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Private Sub AideToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AideToolStripMenuItem.Click
        Dim path As String = IO.Path.Combine(My.Settings.Diruser, "_Game Switchers")
 
        With OpenFileDialog1
            .InitialDirectory = (path)   
            .Title = "Besoin d'une petite pepelle?" 
            .CheckFileExists = True
            .Filter = "Fichiers pdf|*.pdf" 
        End With
        OpenFileDialog1.ShowDialog() 
    End Sub
End Class

Le seul problème, c'est que quand je double clique sur un fichier pdf et que je fait ouvrir, il ne se passe rien.
Par contre, quand je fait bouton droit et ouvrir avec, ca fonctionne.

Comment est ce que ca peut fonctionner juste en faisant ouvrir?

[Pol63]

openfiledialog sert à sélectionner un fichier
une fois qu'on clic sur ouvrir, ca permet juste de récupérer le nom du fichier que l'utilisateur à choisit
si tu veux l'executer utilise process.start

et tu re-développes windows au juste ? ^^

[Lechette]

Non je ne redéveloppe pas windows...
Je cherche juste à faire un petit logiciel qui facilite la tache aux utilisateurs d'un jeu pour pouvoir gérer une petite cinquantaine de mods en fonction des capacités de leur machine...
Et en même temps, comme je débute complêtement, ca me permet de découvrir le développement!

[Lechette]

Voila, j'ai fait quelque chose qui marche à peu près.


Merci de ton coup de main, et encore désolé pour les questions bêtes, mais c'est comme ca que j'apprends le mieux...

Pour ceux que ca interressera:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub AideToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AideToolStripMenuItem.Click
        Dim pdf As String
        Dim path As String = IO.Path.Combine(My.Settings.Diruser, "_Game Switchers")
        'On pose les conditions d'ouverture du dossier Readme
        With OpenFileDialog1
            .InitialDirectory = (path)   'répertoire de départ        
            .Title = "Besoin d'une petite pepelle?" 'titre...
            .CheckFileExists = True
            .Filter = "Fichiers pdf|*.pdf" ' on travaille uniquement sur les .pdf
        End With
        OpenFileDialog1.ShowDialog() 'ouvre la boite de dialogue
        pdf = OpenFileDialog1.FileName
        Process.Start(pdf)
    End Sub
 
End Class

[harz62]

Je cherche juste à faire un petit logiciel qui facilite la tache aux utilisateurs d'un jeu pour pouvoir gérer une petite cinquantaine de mods en fonction des capacités de leur machine...

Une sorte de Steam ^^

[Lechette]

Oui c'est ca mais pour IL2