Function File_GetLastModified( sFile )
Dim objFileObj, objFile
Set objFileObj = CreateObject("Scripting.FileSystemObject")
If sFile = "" Then
sFile = Server.MapPath( Request.ServerVariables
("script_NAME") )
End If
Set objFile = objFileObj.GetFile(sFile)
File_GetLastModified = objFile.DateLastModified
End Function
Response.Write "记录文件被修改:" & File_GetLastModified
("d:\shenzhaoyang\record.txt")
Response.Write "糟了,这个文件已被修改过!" & File_GetLastModified("")
[1]
最后
以上就是陶醉奇迹最近收集整理的关于如何获知文件被改动的情况?的全部内容,更多相关如何获知文件被改动内容请搜索靠谱客的其他文章。
本图文内容来源于网友提供,作为学习参考使用,或来自网络收集整理,版权属于原作者所有。
发表评论 取消回复