|
|||||||
|
|
|
![]() |
|
|
Strumenti |
|
|
#1 |
|
Junior Member
Iscritto dal: Mar 2009
Messaggi: 13
|
[VB.NET08EE]Verificare file in una directory
Ho provato con il seguente codice a verificare se esistono file .bin in una deirectory, ma non funziona correttamente. Qualche consiglio?
Codice HTML:
If Not File.Exists(My.Computer.FileSystem.SpecialDirectories.MyDocuments & "/Dati internet/*.bin") Then
MsgBox("non esistono file")
End If
|
|
|
|
|
|
#2 |
|
Senior Member
Iscritto dal: Oct 2004
Messaggi: 1196
|
Codice:
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
__________________
Acquisti: zeta911 xenotic naso89 blacknokia doom3.it Charlie Oscar Delta giukey Bravonera2 Domilor Re tony francofranco fabioBS Jimmy_Vans Axip fanaticgames daddyxx1 ces53 ddd francescosalvaggio Xidius franco112 kwolverine salvo00 simo.cava88 schumyFast raffaelev ercagno akfriger pupgna Spank xblastx Vendite: HellSpawn tonainings DarkVampire younker cybmatrix simoner78 david-1 maestrobea Quiksilver josimar75 pellanerus חוה dalster dedalos1 aledom @mark@ TheDarkAngel Burnt_Boy BB83 nclbj |
|
|
|
|
|
#3 |
|
Junior Member
Iscritto dal: Mar 2009
Messaggi: 13
|
Grazie
|
|
|
|
|
|
#4 | |
|
Senior Member
Iscritto dal: Dec 2004
Messaggi: 3210
|
Quote:
Con 1 sola riga di codice puoi anche decidere se la ricerca deve essere ricorsiva in tutte le eventuali sottocartelle oppure no : Codice:
If My.Computer.FileSystem.GetFiles(percorsoCartella, FileIO.SearchOption.SearchTopLevelOnly, "*.bin").Count = 0 Then
MsgBox("non ci sono files")
End If
|
|
|
|
|
|
| Strumenti | |
|
|
Tutti gli orari sono GMT +1. Ora sono le: 19:49.




















