adminaddclassadmin.asp

程序名称：酷虎网校友录 V1.0 （商业版）*(修改版） * 本软体为商业软件

<!--#include file="conn.asp"-->
<!--#include file="inc/sessionadmin1.asp"-->
<%
ID=Request("ID")
SQL="Select * From 注册信息 Where ID=" & Int(ID)
Set RS=Server.CreateObject("ADODB.Recordset")
RS.Open SQL,Connstr,1,1
IF Not RS.EOF Then
SQL="Select * From 班级设置 Where ID=" & Int(RS("班别"))
Set RS=Server.CreateObject("ADODB.Recordset")
RS.Open SQL,Connstr,3,2
RS("管理员")=Int(ID)
RS.Update
End IF
Response.Redirect "adminstuinfo.asp"
%>