VB.NET 定时删除文件解决方案

VB.NET 定时删除文件
想实现定时删除服务器上的文件（Web）的，该怎么实现
------解决方案--------------------
如果只是删除目录下的文件，不考虑日期，那么就写一个批命令文件，用定时任务就是；如果要考虑保留新的文件，如保留7天的文件，那么得写一个程序，读取文件的时间，超过7天就删除：
代码大概这样，你完善一下：
 Private Sub Timer1_Tick(sender As System.Object, e As System.EventArgs) Handles Timer1.Tick
        Dim files As String() = Directory.GetFiles("J:\\data", "*.txt", SearchOption.AllDirectories)
        For Each file In files
            Dim f As FileInfo = New FileInfo(file)
            Dim nowtime As DateTime = DateTime.Now
            Dim t As TimeSpan = nowtime - f.CreationTime
            Dim day As Integer = t.Days
            If (day > 7) Then
                f.Delete()
            End If
        Next
    End Sub


------解决方案--------------------
使用计时器事件。通过计时器经过的时间判断删除操作。

计时器是我的眼里是一个智能机器！