gusucode.com > asp+SQLServer网上书店系统设计(源代码+论文) > asp+SQLServer网上书店系统设计(源代码+论文)\网上书店asp+SQLServer\网上书店\admin\del_content.asp

    <!--#include file="conn.asp"-->
<% 
 if session("admin")="" then
  Response.redirect "backlogin.asp?msg=对不起你还没有登录,请先登录!"
 end if
%>
<%
   dim SQL, Rs,ID,CurrentPage
   CurrentPage = request("Page")
   ID=request("ID")
   set rs=server.createobject("adodb.recordset")
   sqltext="delete from 书评 where ID="&ID
   rs.open sqltext,cn,3,3
   set rs=nothing
   response.redirect "content_check.asp?page="&CurrentPage
%>