PDA

View Full Version : [VB.NET08EE]Verificare file in una directory


Nottambulo75
20-04-2009, 15:28
Ho provato con il seguente codice a verificare se esistono file .bin in una deirectory, ma non funziona correttamente. Qualche consiglio?

If Not File.Exists(My.Computer.FileSystem.SpecialDirectories.MyDocuments & "/Dati internet/*.bin") Then
MsgBox("non esistono file")
End If

Grazie, ciao

micoud
20-04-2009, 16:29
Imports System.IO

..................................

Dim directory As New IO.DirectoryInfo(My.Computer.FileSystem.SpecialDirectories.MyDocuments & "/Dati internet/")
Dim allFiles As IO.FileInfo() = directory.GetFiles("*.bin")
If allFiles.Length <> 0 Then
MsgBox("Esistono")
Else
MsgBox("Non Esistono")
End If

Nottambulo75
20-04-2009, 16:41
Grazie :)

MarcoGG
20-04-2009, 17:14
Ho provato con il seguente codice a verificare se esistono file .bin in una deirectory, ma non funziona correttamente. Qualche consiglio?


Dal momento che usi VB 2008 perchè non sfruttare la potenza del NameSpace My ?
Con 1 sola riga di codice puoi anche decidere se la ricerca deve essere ricorsiva in tutte le eventuali sottocartelle oppure no :

If My.Computer.FileSystem.GetFiles(percorsoCartella, FileIO.SearchOption.SearchTopLevelOnly, "*.bin").Count = 0 Then
MsgBox("non ci sono files")
End If

Per cercare anche nelle SubDirectory > FileIO.SearchOption.SearchAllSubDirectories

;)