<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<!--#include file=DataBase/conn.asp-->
<!--#include file=config.asp-->
<!--#include file=purview.asp-->
<%
call users
if request("del")<>"" then'判斷是否提交表單
kid=Split(Request("del"),",") '分解字符串成數組
response.Write("正在刪除...")
for i=0 to ubound(kid)
sqld="delete from tb_User where id="&clng(kid(i)) '逐個刪除
conn.execute(sqld)
next
if request("p")="" then
response.Redirect("user.asp")
else
response.Redirect("user.asp?p="&request("p"))
end if
else
response.Write("<script language=javascript>alert('請選擇要刪除的信息');location='javascript:history.go(-1)'</script>")
end if
%>