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

    <% 
 if session("admin")="" then
  Response.redirect "backlogin.asp?msg=对不起你还没有登录,请返回登录!"
 end if
%>
<!--#include file="conn.asp"-->
<%
   dim SQL, Rs,ID,CurrentPage
   CurrentPage = request("Page")
   ID=request("ID")

   set rs=server.createobject("adodb.recordset")
   sqltext="delete from 用户 where user_ID="&ID
   rs.open sqltext,cn,3,3
   set rs=nothing
   response.redirect "user_check.asp?page="&CurrentPage
%>