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 "糟了,這個(gè)文件已被修改過!" File_GetLastModified("")
[1]
標(biāo)簽：雞西 邯鄲 襄陽 朔州 威海 中山 遵義 柳州
巨人網(wǎng)絡(luò)通訊聲明：本文標(biāo)題《如何獲知文件被改動的情況？》，本文關(guān)鍵詞 如何,獲知,文件,被,改動,；如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題，煩請?zhí)峁┫嚓P(guān)信息告之我們，我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò)，涉及言論、版權(quán)與本站無關(guān)。
