比较上次修改后的文本文件日期（如果超过12小时） - 经典ASP

Question

我编写了以下Classic ASP代码，将readme.txt文件的上次修改日期显示为11/26/2013 2:00:45 AM。

我想要做的是比较上次修改后的文本文件日期，如果它超过12小时显示“文本文件旧了请更新”，如果它不是ELSE “文本文件是最新的“

Dim objFSO, objFile, fname, fullname, my_array
fname= "readme.txt" 


Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.GetFile(Server.MapPath(fname))
Response.Write "Last Modified date of file "& objFile.Name & " = " & objFile.DateLastModified

Answer 1

使用DateDiff函数

DateDiff(interval, date1, date2 [,firstdayofweek[, firstweekofyear]])

示例：

DateDiff( "h", now, objFile.DateLastModified)

看看here