源码网商城,靠谱的源码在线交易网站 我的订单 购物车 帮助

源码网商城

如何获知文件被改动的情况?

  • 时间:2021-12-13 18:14 编辑: 来源: 阅读:
  • 扫一扫,手机访问
摘要:如何获知文件被改动的情况?
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("") [b][1][/b]
  • 全部评论(0)
联系客服
客服电话:
400-000-3129
微信版

扫一扫进微信版
返回顶部