📄 delete.asp
字号:
<%@ LANGUAGE="VBSCRIPT" %>
<%
if session("admin")="" then
objconn.close
set objconn=nothing
response.redirect "../default.asp"
end if
%>
<!--#include file="dbpath.asp"-->
<%dim sql,objrs
set objrs=server.createobject("adodb.recordset")
sql="select * from gallery where id="&request("ID")
objrs.open sql,objconn,1,3
if objrs.EOF then%>
<script language="Vbscript">
msgbox"sorry,this picture not exist in database,please refresh to check it!",0,"error"
history.back
</script>
<%else
objconn.execute ("delete from gallery where id="&request("ID"))
objrs.close
set objrs=nothing
objconn.close
set objconn=nothing
end if
%><head>
<meta http-equiv="refresh" content="1;URL=<%=request.serverVariables("Http_REFERER")%>">
</head>
<center>
删除成功，请等待片刻...
</center>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -