Pregunta sobre FileSystemObject

Skaaven
08 de Octubre del 2002
¿Sabra alguien decirme como puedo hacer para saber el nmero de archivos en un directorio usando este objeto -o cualquier otro-?
Agradecera mucho la respuesta

yareaj
08 de Octubre del 2002
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