Pregunta sobre FileSystemObject
¿Sabría alguien decirme como puedo hacer para saber el número de archivos en un directorio usando este objeto -o cualquier otro-?
Agradecería mucho la respuesta
Agradecería mucho la respuesta
Hola,
Dim fso As New FileSystemObject
Dim vd_carpeta As Scripting.Folder
Dim vd_archivo As Scripting.File
Set vd_carpeta = fso.GetFolder("c:directoriodirectorio2")
numero_de_archivos = vd_carpeta.Files.Count
For Each vd_archivo In vd_carpeta.Files
'te los recorres para tratarlos
Next
Dim fso As New FileSystemObject
Dim vd_carpeta As Scripting.Folder
Dim vd_archivo As Scripting.File
Set vd_carpeta = fso.GetFolder("c:directoriodirectorio2")
numero_de_archivos = vd_carpeta.Files.Count
For Each vd_archivo In vd_carpeta.Files
'te los recorres para tratarlos
Next