delarticle.asp

采用三级目录

<%
  if session("admin")="" then
  response.redirect "admin.asp"
  else
	if session("flag")>2 then
		response.write "<br><p align=center>您没有操作的权限</p>"
		response.end
	else
%>
<!--#include file="conn.asp"-->
<%
    set rs=server.CreateObject ("ADODB.Recordset") 

rs.open "Select * from article where articleid="&request("id") ,conn,2,3  

rs.delete  
  
        
Response.Write "<script>window.alert('文章删除成功！');window.location='adminedit.asp';</script>"     
	end if
  end if
%>