

<!--#include file="conn.asp"-->
<%
if session("admin")="" then
conn.close
set conn = nothing
response.Write "<script language='javascript'>alert('请先登录！');location.href='index.asp' ;</script>"
response.End
else
if request.cookies("sundxshop")("admin")="" then
conn.close
set conn = nothing
response.Write "<script language='javascript'>alert('请先登录！');location.href='index.asp' ;</script>"
response.End
end if
end if
if session("rank")>1 then
conn.close
set conn = nothing
response.Write "<script language='javascript'>alert('你无权删除图片！');history.go(-1);</script>"
response.End
end if
%>
<title>删除图片管理</title>

<% 

Const UploadDir = "../images/upfile/" '存放文件的目录 

Dim filename,page 

page = Request.QueryString("page") 

filename = Request.QueryString("filename") 

Dim Fso 

Set Fso = Server.CreateObject("Scripting.FileSystemObject") 

If Fso.FileExists(Server.MapPath(UploadDir & filename))= True Then 

Fso.DeleteFile Server.MapPath(UploadDir & filename) 

End If 

Response.Redirect "admin_delotherpropic.asp?page=" & page 

%> 








<!--#include file="footer.asp"-->