如何获知文件被改动的情况？
- 技术交流
- 2024-10-01 10:02:02
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:shenzhaoyangrecord.txt")
Response.Write "糟了,这个文件已被修改过!" & File_GetLastModified("")
[1]
如何获知文件被改动的情况？由讯客互联技术交流栏目发布，感谢您对讯客互联的认可，以及对我们原创作品以及文章的青睐，非常欢迎各位朋友分享到个人网站或者朋友圈，但转载请说明文章出处“如何获知文件被改动的情况？”
