del_buk.asp

闲置物品免费交易的平台

<!--#include file=conn.asp-->
<%if session("admin")="" then
response.Write "<script LANGUAGE='javascript'>alert('网络超时或者您还没有登录请登录');window.location.href='login.asp';</script>"
response.End
else
if session("flag")>2 then
response.Write "<p align=center><font color=red>您没有此项目管理权限！</font></p>"
response.End
end if
end if
%>
<link href="../images/css.css" rel="stylesheet" type="text/css">
<%
dim objFSO,bak
bak=trim(request("bak"))
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
if objFSO.fileExists(Server.MapPath("..\databackup\"&bak)) then
objFSO.DeleteFile(Server.MapPath("..\databackup\"&bak))
end if
%>
删除备份数据库成功！