.net开发笔记之七:定时清除临时文件

例如清除temp目录下昨天以前生成的文件:

        '先取得temp文件夹中的文件列表
        Dim fileEntries() As String = System.IO.Directory.GetFiles(MapPath("temp"))
        Dim sFile As String
        '遍历文件列表
        For Each sFile In fileEntries
            '将文件的生成日期与系统日期相比，如果是昨天以前生成的文件,删除它
            '注:文件的生成日期与文件属性中的修改时间不同
            If DateTime.Compare(System.IO.File.GetCreationTime(sFile).AddDays(1), DateTime.Now) < 0 Then
                System.IO.File.Delete(sFile)
            End If
        Next