glyglbc.asp

来自「学籍管理功能,能实现调班注销学籍等,中小学通用」· ASP 代码 · 共 30 行

<%
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("../1date_wei.mdb")
%>
<%
dim id
  id=request("id") '获取的ID值如: id=1,3
  nid=split(id,", ")  ' 根据逗号把id分割,返回数组nid
  sid=ubound(nid) '得到几个值
  for i = 0 to sid  'nid(i)就是要操作的id,并做循环更新记录
   
  set rs=server.CreateObject("adodb.recordset")
  sql="select * from admin_name where id="&nid(i)&"" 
  rs.open sql,conn,1,3
  
 rs("class")=request("class"&nid(i))

   rs("admin")=request("admin"&nid(i))
    rs("jibie")=request("jibie"&nid(i))
     rs("class_1")=request("classB"&nid(i))
  rs("power")=request("power"&nid(i))
 
       
  rs.update 
  rs.close 
  set rs=nothing
  next
   response.Redirect"glymd.asp"
  %>