Bonjour,
Je débute su vb.net et je dois construire un programme qui recherche à l'intérieur de mes sous dossier et dossiers les exécutables des dernières versions, et les installer.
J'ai donc commencé par rechercher tous les exécutables dans les dossiers et es sous-dossiers, jusque la pas de problème.
Ensuite il me faut "trier" en quelque sorte les fichiers par nom, c'est à dire récupérer ceux qui ont le même nom pour pouvoir les retrier par la suite pour pouvoir lancer l'executable le plus récent...C'est la qu'advient le problème. J'ai utilisé la commande subscribe pour récupérer seulement le nom des fichiers que j'ai installé dans une listbox, mais je suis bloquée... Comment récuperer ces fichiers de même nom pour les retrier derrière ?
Je vous remercie vivement pour vos réponses
Pour ceux que ça interesse, ce que j'ai déja fait :p
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
17
18
19
20
21
22
23
24 Imports System.IO Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load For Each file As String In Directory.GetFiles("P:\CTRL_Projets\DTM_Repository", "*.exe", System.IO.SearchOption.AllDirectories) Dim lStr As String = file Dim lDossierNom As String = IO.Path.GetFileName(IO.Path.GetDirectoryName(lStr)) Dim startIndex As Integer = 30 Dim length As Integer = 20 Dim substring As String = file.Substring(startIndex, length) Dim LaDate As Date = IO.File.GetLastWriteTime(file) ListBox2.Items.Add(LaDate) ListBox1.Items.Add(substring) Next End Sub End Class
Partager