www.pudn.com > QQ.zip > DelUser.asp, change:2009-07-11,size:705b


<!--#include file="conn.asp"--> 
<% 
  if session("admin")="" then 
    Response.Write("<script>alert('用户未登录,请登录!');top.location='../admin.asp';</script>") 
	Response.end 
  end if 
  TypeArea = request.QueryString("TypeArea") 
  if Request.QueryString("id")="" then 
    Response.Write("<script>alert('参数错误,执行失败!');history.back();</script>") 
	Response.end 
  end if 
  id=Request.QueryString("id") 
  if isnumeric(id)=false then 
    Response.Write("<script>alert('参数错误,执行失败!');history.back();</script>") 
	Response.end 
  end if 
  sql="delete from tb_zh_info where id=" & id 
  conn.execute sql 
  Url = "UserList.asp?TypeArea=" & TypeArea 
  Response.redirect(Url) 
%>