Elencare file in base al mese

di Francesco53 il
4 risposte
Il titolo è sbagliato intendevo giorno e non mese.
Buona serata a tutti, cerco di leggere i files contenuti in una cartella e riesco con il seguente codice:
Imports System.IO
Public Class Form1
    Dim percorso As String = Directory.GetCurrentDirectory()
    Dim mes As String
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim Files() As String
        Dim f As FileInfo

        Files = Directory.GetFiles(percorso & "\Mese\")

        For Each sFile As String In Files
            f = New FileInfo(sFile)
            ListBox1.Items.Add(f.Name.Substring(0, 10))
        Next
    End Sub
Legge tutti i files come da immagine, giorno mese anno:



Vorrei però visualizzare solo i file in base al giorno e ho provato a modificare il codice su esposto,
in una textbox digito il giorno da visualizzare ma mi esce sempre errore anche provando con altre modifiche.
Questo è il codice modificato:
Imports System.IO
Public Class Form1
    Dim percorso As String = Directory.GetCurrentDirectory()
    Dim gg As String

    Sub prova()
        Dim Files() As String
        Dim f As FileInfo

        gg = txtgg.Text
        Files = Directory.GetFiles(percorso & "\Mese\" & gg & "*" & ".txt")

        For Each sFile As String In Files
            f = New FileInfo(sFile)
            ListBox2.Items.Add(f.Name.Substring(0, 10))
        Next
    End Sub
End Class
Chiedo cortesemente un aiuto per superare la difficoltà.
Grazie
Francesco

4 Risposte

  • Essendo f la stringa che contiene il nome del file, devi aggiungerla alla ListBox soloSE si riferisce al giorno specificato.
  • Devi usare la versione della GetFiles con due argomenti stringa. Vedi la documentazione (come ti suggerivo di fare anche su Mastedrive)
    
            gg = txtgg.Text
            Files = Directory.GetFiles(percorso & "\Mese",  gg & "*.txt")
    
  • Un ringraziamento ad entrambi per le risposte che hanno risolto la mia difficoltà.
    Per oregon, purtroppo non ricordavo questo tuo appunto su masterdrive, la memoria incomincia a latitare.
    Conservo tutti i link delle mie richieste su masterdrive solo che purtroppo non riesco più a visualizzarli.
    Grazie,
    Francesco
  • Non era un appunto ma tanti consigli a studiare la documentazione di ciò che si usa (AntonioG)

    Il sito è spento quindi dei link non te ne fai nulla.
Devi accedere o registrarti per scrivere nel forum
4 risposte