del_article.asp

来自「自己做的一个网站」· ASP 代码 · 共 17 行

<% option explicit%>
<%response.Buffer=true%>
<!--#Include file="conn1.asp"-->
<%
if session("login")<>"yes" then
response.write"此页只能版主有权使用。"
response.end()
end if
dim sql,id
id=Request.QueryString("id")
sql="Delete From article Where id=" & id
conn1.Execute(sql)
conn1.Close
set conn1=nothing
Response.Redirect "list_article.asp"
%>