lire plusieurs fichiers qui contienne une date de ma teextbox

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : lire plusieurs fichiers qui contienne une date de ma teextbox

test3333

Bonjour j'ai une erreur sur file.readalllines(file) n'est pas un membre de string.
J'ai plusieurs fichier . csv dans un dossier de la forme nom date heure.csv ( frite 19032022 1005.csv)je voudrais récupérer que les fichiers dont la date que je renseigne dans ma textbox pour les regrouper trier et listr mais ça c'est fait.
Merci

Code :

Private Sub ok_Click(sender As Object, e As EventArgs) Handles ok.Click
' on récupere tous les fichiers CSV
Dim files = Directory.GetFiles("C:\test", "*.csv" )
'on va créer une List de DataTrucss et la remplir
Dim datas As List(Of DataTrucss) = New List(Of DataTrucss)
For Each file In files
'on va lire chaque fichier séparément et en faire un tableau dont chaque ligne est une entrée
Dim lignes As String() = file.ReadAllLines(file)
For Each l In lignes
datas.Add(New DataTrucss(l))
Next
Next
'regrouper les données par article et par couleur
Dim regroupement = datas.GroupBy(Function(x) x.ToString)
For Each groupe In regroupement
ListView1.Items.Add(New ListViewItem({groupe.First().Article, groupe.First().Couleur, groupe.Count.ToString()}))
Next
End Sub

Code :

Class DataTrucss
Public Sub New(ByVal LigneCsv As String)
Dim l As String() = LigneCsv.Split(";"c)
Article = l(0)
Couleur = l(1)
End Sub
Public Property Article As String
Public Property Couleur As String
Public Overrides Function ToString() As String
Return $"{Article}, {Couleur}"
End Function
End Class
Class DatasTriees
Public Sub New(ByVal Combinaison As DataTrucss, ByVal LaQuantite As Integer)
Donnee = Combinaison
Quantite = LaQuantite
End Sub
'1 combinaison Article / Couleur
Public Property Donnee As DataTrucss
'la quantité de cette combinaison
Public Property Quantite As Integer
Public Overrides Function ToString() As String
Return $"{Donnee.Article}, {Donnee.Couleur} x{Quantite}"
End Function
End Class

Message édité par test3333 le 19-03-2022 à 10:40:36

Publicité

TotalRecall

Pas tout compris à ton explication, mais ReadAllLines est une méthode statique de File qui attend un chemin, et non pas une méthode d'instance de ton "file" :

Code :

...
Dim files = Directory.GetFiles("C:\test", "*.csv" )
For Each file In files
Dim lignes As String() = File.ReadAllLines(file)
...

Donc ton erreur de compilation vient probablement de là pour commencer.

Message cité 1 fois
Message édité par TotalRecall le 19-03-2022 à 16:58:01

---------------
Topic .Net - C# @ Prog

test3333

Merci pour le coup de pouce
En fait je voudrais lire tout les fichiers d'un dossier qui contienne la date que l'on renseigne dans la textbox.
Les lires tous en remplissant une list et aprés de les regrouper selon articles + couleur et si il sont identique on incrémente la quantité.
J'ai juste besoin de savoir sélectionner les bon fichiers
Car dans mon exemple c'est pour tout les fichiers de C:\test

TotalRecall a écrit :

Pas tout compris à ton explication, mais ReadAllLines est une méthode statique de File qui attend un chemin, et non pas une méthode d'instance de ton "file" :

Code :

...
Dim files = Directory.GetFiles("C:\test", "*.csv" )
For Each file In files
Dim lignes As String() = File.ReadAllLines(file)
...

Donc ton erreur de compilation vient probablement de là pour commencer.

TotalRecall

Avec une expression régulière ?

En C# ça donnerait :

var regex = new Regex(@"frite \d{8} \d{4}.csv" );
foreach(var file in files.Where(f => regex.IsMatch(f))
{
...
}

Je te laisse transposer en vb

Message cité 1 fois

---------------
Topic .Net - C# @ Prog

test3333

Oula merci mais j'ai aucune connaissance en C#

TotalRecall a écrit :

TotalRecall

https://converter.telerik.com/

---------------
Topic .Net - C# @ Prog

FORUM HardWare.fr

Programmation

C#/.NET managed

lire plusieurs fichiers qui contienne une date de ma teextbox

Sujets relatifs
Continuer à accéder à des fichiers après publication (sous VS) ?	Lire et déplacer un fichier TAR avec nom alternatif bash
[Résolu] PhpMyAdmin : msg d'erreur avec plusieurs requêtes SQL	[VBA] code outlook format date
Filtrer sur la date d'hier dans une requête SQL	Resultat en fonction d'une date
Convertir une date ex. 12-05-21 en 12-05-2021	Excel / google sheet Plusieurs set de data sur même axe x (Insoluble?)
Select where avec plusieurs valeurs	[Batch] Ajout date création au nom lors d'une copie
Plus de sujets relatifs à : lire plusieurs fichiers qui contienne une date de ma teextbox

Page générée en 0.082 secondes