Vb.Net Cherche les bouton Dir - Drive et File de VB6 [Résolu]
cs_MagDix532
Messages postés lundi 5 juin 2006Date d'inscription
6 octobre 2012
Dernière intervention
-
29 mai 2008 à 16:39 - Dernière réponse : cs_Gammacronosios49
Messages postés lundi 25 octobre 2004Date d'inscription
23 février 2010
Dernière intervention
- 30 mai 2008 à 21:12
Bonjour...
Je cherche les boutons Dir, File et Drive de VB6 en .Net
Pour avoir la liste des répertoire, la liste des fichiers du répertoire et voir les disque rigide...
Je clique où dans les bouton pour avoir cela en Vb.Net
Pour obtenir la lettre des disques installés sur l'ordinateur (disque dur, disquette, dvd-rom, clé usb, ...) :
For i As Integer = 0 To My.Computer.FileSystem.Drives.Count - 1 ' Liste tous les disques installés sur l'ordinateur
MsgBox(My.Computer.FileSystem.Drives.Item(i).Name) ' Affiche le nom du disque
Next
Pour obtenir la liste des fichiers en incluant les sous-dossiers :
For Each Files As String In My.Computer.FileSystem.GetFiles("C:", FileIO.SearchOption.SearchAllSubDirectories)
' Liste tous les fichiers présent sur C:\ en incluant les sous dossiers
MsgBox(Files) ' Affiche le chemin d'accès complet du fichier
Next
Pour obtenir la liste des fichiers en excluant les sous-dossiers :
For Each Files As String In My.Computer.FileSystem.GetFiles("C:", FileIO.SearchOption.SearchTopLevelOnly)
' Liste tous les fichiers présent sur C:\ en excluant les sous-dossiers
MsgBox(Files) ' Affiche le chemin d'accès complet du fichier
Next
Pour obtenir la liste des dossiers en incluant les sous-dossiers :
For Each Folders As String In My.Computer.FileSystem.GetDirectories("C:", FileIO.SearchOption.SearchAllSubDirectories)
' Liste tous les dossiers présent sur C:\ en incluant les sous-dossiers
MsgBox(Folders) ' Affiche le chemin d'accès complet du dossier
Next
Pour obtenir la liste des dossiers en excluant les sous-dossiers :
For Each Folders As String In My.Computer.FileSystem.GetDirectories("C:", FileIO.SearchOption.SearchTopLevelOnly)
' Liste tous les dossiers présent sur C:\ en excluant les sous-dossiers
MsgBox(Folders) ' Affiche le chemin d'accès complet du dossier
Next
je ne suis pas d'accord avec Kevin.Ory, les FileList,DirList et DriveList existent, amis il faut les ajouter dans la boite à outils.
Click droit sur la Boite à outils->Ajouter/Supprimer des élements
Dans la fenêtre qui s'affiche, choisir l'onglet "Composants.Net Framework"
Dans la liste de cases à cocher qui s'affiche, sélectionner :
- FileListBox
- DirListBox
- DriveListBox
Ils ont tous les 3 comme espace de nom "Microsoft.VisualBasic.Compatibility.VB6"
Voila, et dans la boite à outils maintenant on a les bouttons de ces controles.
C'est un art la programmation, non
Kevin.Ory843
Messages postés mercredi 22 octobre 2003Date d'inscription
7 janvier 2009
Dernière intervention -30 mai 2008 à 20:44
0
Merci
je ne suis pas d'accord avec Kevin.Ory, les FileList,DirList et
DriveList existent, amis il faut les ajouter dans la boite à outils.
Ah oui OK, bon a savoir ça
Mais bon, je suis pas du genre à utiliser le NameSpace Microsoft.VisualBasic.Compatibility.VB6
Je préfère nettement utiliser le framework plutot que des fonctions de retrocompatibilité de VB, qui sont beaucoup moins performantes et qui vont certainement bientot disparaitre...
Et faire le même effet avec les classe du framework c'est vraiment pas compliqué. Voila pour afficher les fichier se trouvant dans C:\ :
ListBox1.DataSource = IO.Directory.GetFiles("C:")
Mais en plus ça permet de formater et filter l'affichage comme on veut, donc beaucoup mieux à mon gout
Désolé je n'avais pas vu ça comme ça ^^
J'avais trouvé plus pratique pour MagDix d'utiliser des controles qu'il connait bien et de ne pas trop s'aventurer dans
un domaine qu'il ne connait peut-être pas (désolé je ne connais pas ton niveau MagDix)
Cependant je suis tout à fait d'accord, autant utiliser les fonctions que nous offre le framework si on est en .net
a aidé 68 internautes ce mois-ci