Mensajes

Hola.
me gustaria saber como puedo hacer para mover unos ficheros segun su fecha de creacion y dejarlos en una carpeta independiente. Tengo en una carpeta una serie de log que me ocupan mucho y que se crean a diario y megustaria hacer una tarea que moviera los ficheros a partir del ultimo mes y luego en esa carpeta yo comprimirlos con otra tarea que tengo preparada. Se que con este scrip puedo borrar esos ficheros, pero lo que quiero es moverlos.
Set objfso = createobject("scripting.filesystemobject")
Set directorio = objfso.getfolder("C:\log\")
Set dirfiles = directorio.files
For Each d in dirfiles
If datediff("d",d.datecreated,now()) >= 2 Then
If Extension = "txt" Then
objfso.deletefile(d.path) cambiar esto por
Objfso.movefile (d.path)"c:\logantiguos"
End If
End If
next
Lo hago a si pero no me hace nada. Alguien me puede ayudar

Hola.

tengo muchas lagunas con esto del vbs y me gustaria sabiel si alguien me puede ayudar.
necesitaria un script que me buscara ficheros .txt en una carpeta determianda, y en me los comprimiera en un zip o rar segun la fecha de creacion del fichero. he visto algun script en el foro, pero lo que hace es borrar el contenido y  yo lo que necestito es comprimir, o por lo menos mover a otra carpeta, para luego hacer un zip con esos ficheros.

Por favor, decirme algo si alguien sabe como hacerlo, os lo agradeceria mucho.

Saludos y espero alguna contestacion

Hola soy nuevo en el foro y he visto que en temas de vbs, soy muy buenos y como tengo una duda, queria a ver si alguien me puede ayudar.
Yo necesitaria lo mismo que hace el script que se indica en este tema, pero yo lo que necesito no es borrar el resultado si no que es moverlo a una carpeta o incluso mas dificil, comprimierlo en un zip o rar. SI alguien me puede ayudar, se lo agradeceria mucho.

Saludos