elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Guía rápida para descarga de herramientas gratuitas de seguridad y desinfección


  Mostrar Temas
Páginas: [1]
1  Programación / Scripting / Elimina archivos < 15 dias problema con rutas por espacios en: 22 Agosto 2014, 23:55 pm
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
  1. set objshell = createobject("wscript.shell")
  2. objshell.run "cmd /c dir d:\PUBLIC /s /b> templist.txt",vbhide
  3. wscript.sleep 2000
  4. 'listamos los archivos por línea de comandos, y guardamos el listado en un archivo temporal
  5. 'luego hacemos una pausa de dos segs para que se cree correctamente el archivo
  6.  
  7. set objfso = createobject("scripting.filesystemobject")
  8. set temp = objfso.opentextfile("templist.txt",1)
  9. 'abrimos el archivo temporal
  10. do until temp.atendofstream
  11. fi = temp.readline
  12. 'leemos cada una de las líneas del archivo
  13. if objfso.fileexists(fi) = true then
  14. if objfso.getfile(fi).parentfolder.name <> Registros then
  15. 'si existe el archivo (para evitar que sea una carpeta) y la carpeta en la que esta es diferente de Registros
  16. if datediff("d",objfso.getfile(fi).datecreated,now()) >= 15 then
  17. 'objfso.deletefile(objfso.getfile(fi).path)
  18. 'revisamos la fecha y si tiene más de 15 dias (tomando en cuenta la fecha de hoy), lo borramos
  19. end if
  20. end if
  21. end if
  22. loop
  23. temp.close
  24. 'cerramos el archivo temporal

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

Saludos,
Páginas: [1]
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines