asp重命名文件,有时webshell无法下载打包的mdb文件时可用到

作者：admin 发布于：2012-8-17 8:28 Friday 分类：网络转载

<%
'http://www.rabbit8.cn
Set fs = Server.CreateObject("Scripting.FileSystemObject")
SFile = Server.MapPath("HSH.mdb")
NFile = Server.MapPath("HSH.mdb.rar")
on Error Resume Next
fs.MoveFile SFile, NFile
If Err.Number = 53 Then
Response.Write File & "文件不存在！"
Response.End
Elseif Err.Number = 58 Then
Response.Write File & "文件已存在！"
Response.End
Elseif Err.Number <> 0 Then
Response.Write "未知错误，错误编码：" & Err.Number
Response.End
Else
Response.Write "成功重命名文件！" & SFile &"为" &NFile& ""
End If
%>

标签: asp重命名