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

清晰呈现，开篇以自然段落引入，整体风格更接近人工编辑的技术文档。

记录文件修改时间，是Web开发中常见的需求。下面这段VBScript代码封装了一个函数，用于获取指定文件的最后修改时间。若调用时不传参数，则会自动获取当前脚本自身的修改时间。代码简洁直接，适合嵌入ASP页面中使用。

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]

上述代码中，File_GetLastModified函数利用FileSystemObject获取文件对象，再读取DateLastModified属性。调用示例展示了两种场景：一是检查指定路径的record.txt文件，二是对参数留空，自动获取当前页面脚本的修改时间。实际使用时，可根据业务需要将返回值进行格式化或与数据库记录做比对。

注意：Server.MapPath方法需要运行在ASP环境（IIS）中，本地调试时可能无法直接返回路径。另外，对于敏感文件的监控，建议配合权限校验和日志记录，避免暴露服务器路径信息。