Foro de elhacker.net

Hola amigos una duda, que code podria emplear para que borre archivos  creados 15 dias atras (de la fecha actual)
Ejml.
diariamente creo videos, con diferente nombres, y que con una funcione se borren los videos con 15 dias de antiguedad

Te daré una pista, con esto deberías de poder sacarlo.

LastWriteTime
DateTime.Now

Saludos

emmm me podrias dar una ayudita mas ? jeje es q ando algo perdido X)

Aquí (http://www.canalvisualbasic.net/foro/gestion-de-archivos/obtener-las-fechas-de-un-archivo-830/) averiguas la fecha de creación del archivo, realizas una bucle con todos los archivos, y los que cumplen la condición de que fueron creados aproximadamente hace 15 días con DateTime.Now los eliminas inmediatamente.

Disculpa , pero como haria un bucle de la carpeta de los archivos? XP

using System.IO; 
//..........
DirectoryInfo directory = new DirectoryInfo("C:");
foreach (FileInfo file in directory.GetFiles("*.*")) {
 // aca compruebas :)
}
 

Algo asi es, lo hice al vuelo :xD

Bueno el codigo seria asi

Imports System.IO
Public Class Form1
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim Directorio As String = Application.StartupPath
        Dim Fecha As DateTime = DateTime.Now
 
        For Each archivo As String In My.Computer.FileSystem.GetFiles(Directorio, FileIO.SearchOption.SearchTopLevelOnly)
 
            Dim Fecha_Archivo As DateTime = My.Computer.FileSystem.GetFileInfo(archivo).LastWriteTime
            Dim diferencia = (CType(Fecha, DateTime) - CType(Fecha_Archivo, DateTime)).TotalDays
 
            If diferencia >= 15 Then
                File.Delete(archivo)
            End If
 
        Next
 
    End Sub
 
End Class
 
 

Woww muxas Graciasss