frmclass.asp

来自「ASP原码」· ASP 代码 · 共 36 行

ASP
36
字号
<!--#include file="../../System/Const.asp"-->
<!--#include file="../../System/misc.asp"-->

<link rel="stylesheet" href="header.css" type="text/css">
<%
	if cstr(session("usertype"))<>cstr(UTP_ADMIN) then 
		Response.Redirect "../../system/relogin.asp?Info=你的身份检查,出现错误!"
	end if	
%>

<%
	set cn=server.CreateObject("ADODB.connection")
	cn.Open DSN_ACLASS
	set rs=server.CreateObject("ADODB.recordset")
	rs.Open "select * from CLASS", cn
%>	

<HTML>
<BODY bgcolor="#FFFFFF" leftmargin="12" topmargin="10" >
<table width="130" border="0" align="left">
  <tr> 
    <td>&nbsp;</td>
  </tr>
  <tr> 
    <td><a href="frmUser.asp?sql=All&class_id=0&class_name=所有会议室" target="frmUser">所有会议室</a></td>
  </tr>
 <%do while not rs.EOF%>
  <tr> 
    <td><a href="frmUser.asp?sql=All&school_id=<%=rs("SCHOOLID")%>&class_id=<%=rs("ID")%>&class_name=<%=rs("NAME")%>" target="frmUser"><%=rs("NAME")%></a></td>
  </tr>
  <% rs.MoveNext
  loop%>
</table>
</BODY>
</HTML>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?