删除未更新的文件

Question

是否有人知道是否可以删除在特定时间内未更新的文档。我想在每天晚上12:01重新填写一张空白检验单，如果当天没有人输入检验信息，那么当天的表格就会被删除，所以我没有多余的空白检验表保存。

Answer 1

是的，这是可能的。这是基本代码。您需要更改if语句以反映正确的时间段。

Dim oFileObj
Set oFileObj = Wscript.CreateObject("WScript.FileSystemObject")
oFileObj.GetFile("File.Name")  
if oFileObj.DateLastModified < NOW then
    oFileObj.DeleteFile("File.Name")
end if
Set oFileObj = Nothing