Visual Basic - Listar todos los archivos de un directorio

Buenas,

estoy intentando crear una aplicacion que me liste (recursivamente) todos los directorios,subdirectorios y ficheros que pueda haber dentro de un fichero 'padre'...que me los liste y que ademas de poner el path completo del archivo y su nombre, que me indique al lado el tamaño en bytes de dicho archivo.


Muchas Gracias. Saludos.

Buenas,

estoy intentando crear una aplicacion que me liste (recursivamente) todos los directorios,subdirectorios y ficheros que pueda haber dentro de un fichero 'padre'...que me los liste y que ademas de poner el path completo del archivo y su nombre, que me indique al lado el tamaño en bytes de dicho archivo.

Muchas Gracias. Saludos.

y has hecho algo al respecto? o esperas que te lo demos todo hecho?

has investigado sobre la función de VB "Dir"?

o sobre el Objeto "File Systems"?

un vbs para listar archivos si te sirve

Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = True
Set objWorkbook = objExcel.Workbooks.Add()
Set objWorksheet = objWorkbook.Worksheets(1)
x = 1

strComputer = "."
Set objWMIService = _
GetObject("winmgmts:\" & strComputer & " ootcimv2")
Set colServices = objWMIService.ExecQuery _
("Select * from CIM_DataFile where Path = '\ECRM\'")

For Each objService in colServices
objExcel.Cells(x, 1) = objService.Name

x = x + 1
Next

Set objRange = objWorksheet.UsedRange
objRange.EntireColumn.Autofit()

Set objRange = objExcel.Range("A1","A1")

he aqui la respuesta a tu visual basic avanzado

http://www.lawebdelprogramador.com/news/mostrar_new.php?id=93&texto=Visual+Basic&n1=519977&n2=1&n3=0&n4=0&n5=0&n6=0&n7=0&n8=0&n9=0&n0=0