在一个文件夹下面有一些文件.我想用vb写一个程序,只要在程序中输入一个时间范围,就可以把这个文件夹下面这个时间范围内创建的文件删除掉.请问各位大侠,有什么好的办法没有啊?应该还要调api以得到文件的创建时间吧?应该调用哪个api呢?

解决方案 »

  1.   

    语法
    object.ParentFolder 
    object 应为 File 或 Folder 对象的名称。 说明
    以下代码举例说明如何使用 ParentFolder 属性: 
    Function ShowFileAccessInfo(filespec)
        Dim fso, f, s
        Set fso = CreateObject("Scripting.FileSystemObject")
        Set f = fso.GetFile(filespec)
        s = UCase(f.Name) & " 的父文件夹为 " & UCase(f.ParentFolder) & "<BR>"
        s = s & "创建时间: " & f.DateCreated & "<BR>"
        s = s & "上次访问时间: " & f.DateLastAccessed & vbCrLf
        s = s & "上次修改时间: " & f.DateLastModified  
    ShowFileAccessInfo = s
    End Function