Visual Basic - Listar todos los archivos de un directorio

Life is soft - evento anual de software empresarial
   
Vista:

Listar todos los archivos de un directorio

Publicado por elias (25 intervenciones) el 29/12/2008 20:19:59
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.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Listar todos los archivos de un directorio

Publicado por elias (25 intervenciones) el 29/12/2008 20:19:59
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.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Listar todos los archivos de un directorio

Publicado por P3L30N (701 intervenciones) el 29/12/2008 21:05:49
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"?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Listar todos los archivos de un directorio

Publicado por Hector (1 intervención) el 20/01/2009 14:23:44
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")
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Listar todos los archivos de un directorio

Publicado por P3L30N (701 intervenciones) el 29/12/2008 23:44:29
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
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar