<%DimobjCMFUDimstrModifiedSetobjCMFU=Server.CreateObject("CM_FileUtils.GetProperty")'创建对象并赋给变量，并且GetProperty类是当前唯一可用的.strModified=objCMFU.LastModified'检索并返回包含最后修改日期和时间（LastModifiedfunction）值.当然了,还要考虑到出错的可能. SetobjCMFU=Nothing'清空.%><%IfstrModified="Error!"Then%>对不起,出错了!<%Else%>...

FunctionFile_GetLastModified(sFile)DimobjFileObj,objFile SetobjFileObj=CreateObject("Scripting.FileSystemObject") IfsFile=""Then sFile=Server.MapPath(Request.ServerVariables("script_NAME")) EndIf  SetobjFile=objFileObj.GetFile(sFile)   File_GetLastModifie...