listclassuser.asp

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

ASP
51 行
字号 
<!--#include file="../../System/Const.asp"-->
<!--#include file="../../System/misc.asp"-->
<link rel="stylesheet" href="header.css" type="text/css">

<%
	set cn=server.CreateObject("ADODB.connection")
	cn.Open DSN_ACLASS

	set resultAll=server.CreateObject("ADODB.recordset")
	strSQLAll="select * from "&TBL_USER&" where ID in (select UID from CLASSUSER where CID="&request("class_id")&")" 
	strSQLAll=strSQLAll+" order by TYPE,USERNAME"
	'Response.Write strSQLALL
	'Response.End 
	resultAll.Open strSQLAll,cn
%>	

<HTML>
<BODY bgcolor="#CDC8CF" leftmargin="0" topmargin="10" >
<!--下面包含头文件-->
<!--下面包含显示所有用户的列表--><br>
<table width="82%" border="0" bgcolor="#000000" align="center" cellspacing="1" height="73" cellpadding="2">
  <tr bgcolor="#FFFFFF"> 
    <td colspan="6" height="34"><b>公司：</b> 
      <%school_id=NameFromID(cn, "CLASS", "ID", "SCHOOLID", clng(request("class_id")))%>
      <%=NameFromID(cn, "SCHOOL", "ID", "NAME", school_id)%> <b>会议室：</b><%=NameFromID(cn, "CLASS", "ID", "NAME", clng(request("class_id")))%> 
    </td>
  </tr>
  <tr bgcolor="#FFFFFF"> 
    <td width="22%" height="19"><b>用户名</b></td>
    <td width="21%" height="19"><b>昵称</b></td>
    <td width="12%" height="19"><b>用户类型</b></td>
    <td width="14%" height="19"><b>密码</b></td>
    <td width="7%" height="19"><b>性别</b></td>
    <td width="24%" height="19"><b>E-Mail</b></td>
  </tr>
  <% while not resultAll.EOF %>
  <tr bgcolor="#FFFFFF"> 
    <td width="22%" height="17">&nbsp;<%=resultAll("USERNAME")%></td>
    <td width="21%" height="17">&nbsp;<%=resultAll("NICKNAME")%></td>
    <td width="12%" height="17">&nbsp;<%=NameFromID(cn, "DIC_USERTYPE","ID","NAME", resultAll("TYPE"))%></td>
    <td width="14%" height="17">&nbsp;<%=resultAll("PASSWORD")%></td>
    <td width="7%" height="17">&nbsp;<%=NameFromID(cn, "DIC_SEX","ID","NAME", resultAll("SEX"))%></td>
    <td width="24%" height="17">&nbsp;<%=resultAll("MailAdd")%></td>
  </tr>
  <%resultall.movenext
        wend%>
</table>
<br>
</BODY>
</HTML>

listclassuser.asp - 源码说明

本页面展示了「ASP原码」中的 listclassuser.asp 源码文件，采用 ASP 编程语言编写，共 51 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与ASP相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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