viewuser.asp

网络购物

<%
'=========================================
'
'         凡人网络购物系统V4.0免费版
'    FreeDown.Net [e-mail] 
'            www.freedown.net
'     版权所有·免费版仅供研究测试只用
'            商业使用请购买正版
'
'=========================================
%>
<%
if session("admin_name")="" then
    response.redirect "login.asp"
end if
set rs=server.createobject("adodb.recordset")
%>
<!--#include file="conn.asp"-->
<%
if request("action")="deluser" then
    sql="select * from member where user_id="&request("user_id")
    rs.open sql,conn,3,3
    if rs.eof then
        response.write "<center>"
        response.write "用户信息已删除!"
    else
        rs.delete
        response.write "<center>"
        response.write "用户信息已删除!"
    end if
end if %>