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 session("usertype")<>UTP_STUDENT 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 where ID in (select CID from CLASSUSER where UID="&session("userid")&")", cn
%>	

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

⌨️ 快捷键说明

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