userdel.asp

网站的后台管理代码......内容比较全面....新手比较适合

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../inc/adconn.asp"-->
<!--#include file="../css.asp"-->

<%
if session("admin_name")="" then 
response.end
end if%>
<%
dim UserID,sql,rs
UserID=trim(Request("UserID"))
if UserID<>"" then
	sql="delete from [User] where UserID=" & Clng(UserID)
	conn.Execute sql
end if  
response.redirect "UserManage.asp"
%>