Temas

Hola, les agradezco su ayuda con un script que encontré en la red con el cual puedo eliminar archivos inferiores a 15 días de creado, en mi caso, pero al hacer la revisión en la estructura de carpetas no encuentra la ruta si hay espacios, he creado el archivo que crea el mismo script con comillas, pero no lee las lineas con comillas, y tampoco con espacios.
este es el script:

Código (vb) [Seleccionar] Expandir

set objshell = createobject("wscript.shell")
objshell.run "cmd /c dir d:\PUBLIC /s /b> templist.txt",vbhide
wscript.sleep 2000
'listamos los archivos por línea de comandos, y guardamos el listado en un archivo temporal
'luego hacemos una pausa de dos segs para que se cree correctamente el archivo

set objfso = createobject("scripting.filesystemobject")
set temp = objfso.opentextfile("templist.txt",1)
'abrimos el archivo temporal
do until temp.atendofstream
fi = temp.readline
'leemos cada una de las líneas del archivo
if objfso.fileexists(fi) = true then
if objfso.getfile(fi).parentfolder.name <> Registros then
'si existe el archivo (para evitar que sea una carpeta) y la carpeta en la que esta es diferente de Registros
if datediff("d",objfso.getfile(fi).datecreated,now()) >= 15 then
'objfso.deletefile(objfso.getfile(fi).path)
'revisamos la fecha y si tiene más de 15 dias (tomando en cuenta la fecha de hoy), lo borramos
end if
end if
end if
loop
temp.close
'cerramos el archivo temporal

Ah, tampoco se a que se refieren con Registros ...

Saludos,