作家
登录

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

作者: 来源:www.28hudong.com 2013-03-30 08:22:54 阅读 我要评论

源码: 复制代码 代码如下: <% '隐藏并修改文件的最后修改时间的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 %>

  推荐阅读

  asp 得到动态数组中元素的个数

一个动态数组 a,如果你已经使用redim 语句给它设定了大小,那么在此之后使用 ubound(a) 就可以得到它的上边界。 如果你没有使用 redim 语句给它设定大小,直接使用 ubound(a) 函数,那么运行时会报错,并会中断程>>>详细阅读


本文标题:asp 隐藏并修改文件的最后修改时间

地址:http://www.17bianji.com/kaifa2/ASP/32060.html

关键词: 探索发现

乐购科技部分新闻及文章转载自互联网,供读者交流和学习,若有涉及作者版权等问题请及时与我们联系,以便更正、删除或按规定办理。感谢所有提供资讯的网站,欢迎各类媒体与乐购科技进行文章共享合作。

网友点评
自媒体专栏

评论

热度

精彩导读
栏目ID=71的表不存在(操作类型=0)