adminbanjipowerdel1.asp

该系统测试用户信息主要由数据库直接输入

<!--#include file="conn.asp"-->
<%
  if session("adminname")="" then
  response.redirect "relogin.asp"
  end if

%>


<%
dim i
dim j
id1=request("id")
'response.write id
id=split(id1,",")
i=ubound(id)
'response.write i
for j=0 to i

  sql1="select  * from tbpower where id="& cint(id(j))
  set rs1=server.createobject("adodb.recordset")
  rs1.open sql1,conn,3,2
  
     
  rs1.delete
  rs1.update
  rs1.close
  
 
next
response.redirect "adminbanjipower.asp"
%>