Obtener la lista de ficheros y subcarpetas de una carpeta dada

2289 vistas

Vamos a usar la función GetFileSystemEntries de la clase System.IO.Directory



vbnet
  1.     Imports System.IO
  2.     Sub Dir(Optional ByVal sDirectory As String = ".")
  3.         Dim sFiles() As String
  4.         Dim i As Integer
  5.  
  6.         sFiles = Directory.GetFileSystemEntries(sDirectory)
  7.         For i = 0 To sFiles.GetUpperBound(0)
  8.             Console.WriteLine(sFiles(i))
  9.         Next
  10.     End Sub



Para sólo obtener los nombres de ficheros (sin subcarpetas) podemos usar



vbnet
  1. System.IO.Directory.GetFiles();