zhanghaobc.asp

学籍管理功能,能实现调班注销学籍等,中小学通用

<%
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 user_name where id="&nid(i)&"" 
  rs.open sql,conn,1,3
  
 rs("特困生")=request("特困生"&nid(i))
 
 
       
  rs.update 
  rs.close 
  set rs=nothing
  next
   response.Redirect"jfb.asp"
  %>