Visual Basic - Crear archivo txt con rutas de archivos en VBscript

Life is soft - evento anual de software empresarial
 
Vista:

Crear archivo txt con rutas de archivos en VBscript

Publicado por Andres (1 intervención) el 25/11/2011 10:48:33
Ante todo un saluido a todos, y muchas gracias. Soy nuevo por estos lares.

Mi pregunta es la siguiente. Tengo una carpeta llena de subcarpetas y en cada una archivos. Necesito un script, que tomando la ruta de la carpeta, recorra la estructura de la misma y me cree un archivo txt, donde se iran incluyendo linea a linea la ruta absoluta de todos los ficheros incluidos en los subdirectorios (puede haber varios niveles de subdirectorios).

EJ: Carpeta_raiz/sub1/sub2/archivo.ext
...
...
...

Muchas gracias.-
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

Crear archivo txt con rutas de archivos en VBscript

Publicado por Pedro Luis (57 intervenciones) el 25/11/2011 14:48:47
Usa la instrucción Dir, Consulta la ayuda
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

Crear archivo txt con rutas de archivos en VBscript

Publicado por jcmg (518 intervenciones) el 30/11/2011 06:28:54
Puedes crear un bat y mandar los datos a un textbox
ejemplo:
escribimos en el bat esta instruccion:
dir c:\windows\*.exe >c:\salida.txt

despues abrimos el archivo salida.txt y lo metemos a un richtextbox

private sub command1_click()
crearelarchivobat
ejecutarbat
meterlosdatosalrich
end sub

sub crearelarchivobat()
open "c:\archivo.bat" for output as #1
print #1,"dir c:\windows\*.exe >c:\salida.txt"
close #1
end sub

sub ejecutarbat()
set ejecutar = createobject("wscript.shell")
ejecutar.run "c:\salida.bat"
end sub

sub meterlosdatosalrich()
richtextbox1.loadfile "c:\salida.txt"
end sub

============
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