📄 user_search.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
'=========================================================
' 学校机房作业管理系统 V 1.0 [创建于200812122100]
' 授权发布网站：清远ABC-http://www.qyabc.com/
' 客服QQ:418322257 E-Mail:qystu@163.com
' 注意：如想得到关于本程序免费的技术支持，
' 必须承诺使用一周后，用平邮回寄“相关文件”文件夹中的“学校机房作业管理系统调查反馈表”表格。
' 作者博客：http://www.qyabc.com/u/qin/Default.aspx
'=========================================================
%>
<!--#include file="inc/config.asp" -->
<!--#include file="Connections/master.asp" -->
<!--#Include file="inc/checksqlIn.Asp"-->
<%
Dim Recordset2
Dim Recordset2_numRows
Set Recordset2 = Server.CreateObject("ADODB.Recordset")
Recordset2.ActiveConnection = MM_master_STRING
Recordset2.Source = "SELECT DISTINCT MasterClass FROM userinfo"
Recordset2.CursorType = 0
Recordset2.CursorLocation = 2
Recordset2.LockType = 1
Recordset2.Open()
Recordset2_numRows = 0
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index
Repeat1__numRows = -1
Repeat1__index = 0
Recordset2_numRows = Recordset2_numRows + Repeat1__numRows
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>查找用户-<%=WebName%></title>
<link href="../inc/STYLE.CSS" rel="stylesheet" type="text/css">
<script language="JavaScript">
<!--
function checkform(){
if(document.form1.name.value=="")
{
alert("请输入查找的内容！");
document.form1.name.focus();
return false;
}
}
//-->
</script>
<script language="JavaScript">
<!--
function checkform2(){
if(document.form2.num.value=="")
{
alert("请输入查找的内容！");
document.form2.num.focus();
return false;
}
}
//-->
</script>
<link rel="SHORTCUT ICON" href="favicon.ico"/>
<link href="<%= SysCss %>" rel="stylesheet" type="text/css">
</head>
<body leftmargin="0" topmargin="0">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="16%" valign="top"><table width="97%" border="0" align="center" cellpadding="5" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td> </td>
</tr>
<tr>
<td align="center"><a href="user_search.asp">查找用户</a><a href="sms_index.asp"></a><a href="admin_exercise_subject_add.asp"></a><a href="admin_news_index.asp"></a></td>
</tr>
<tr>
<td align="center"><a href="user_student_list.asp">学生列表</a><a href="sms_mysend_list.asp"></a><a href="admin_exercise_subject_mylist.asp"></a><a href="admin_news_index.asp"></a></td>
</tr>
<tr>
<td align="center"><a href="user_teacher_list.asp">教师列表</a><a href="sms_write.asp"></a><a href="admin_exercise_content_add.asp"></a><a href="admin_news_add.asp"></a></td>
</tr>
<tr>
<td align="center"><a href="user_sort_list.asp"><font color="#FF0000">按类列表</font></a></td>
</tr>
<tr>
<td align="center"><a href="admin_exercise_content_mylist.asp"></a><a href="user_our_class.asp" target="_self">查看本班同学信息</a><a href="admin_news_add.asp"></a></td>
</tr>
<tr>
<td align="center"><a href="user_all_list.asp" target="_self">查看系统全部用户</a></td>
</tr>
<tr>
<td align="center"><a href="admin_news_add.asp"></a></td>
</tr>
</table></td>
<td width="84%" align="center" valign="middle"><table width="80%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td> <p><strong><font color="#FF0000">1.</font></strong>你可查点击以下班级名称，查看各班用户信息：</p>
<p> <font color="#FF0000">
<%
While ((Repeat1__numRows <> 0) AND (NOT Recordset2.EOF))
%>
<span class="style1"><a href="user_class_sort.asp?aclass=<%=(Recordset2.Fields.Item("MasterClass").Value)%>" target="_self"><%=(Recordset2.Fields.Item("MasterClass").Value)%></a></span> |
<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
Recordset2.MoveNext()
Wend
%>
<br>
</font></p>
</td>
</tr>
<tr>
<td><hr color="#99ccff" width="100%"></td>
</tr>
<tr>
<td><font color="#FF0000"><strong><br>
2.</strong></font>如你想，查找具体姓名，请在下框输入姓名，然后点击“查找”按钮。<font color="#FF0000">(支持模糊查询)<br>
</font> <form action="user_search_result.asp" method="post" name="form1" target="_self" onsubmit="return checkform()">
<div align="center">
<input name="name" type="text" id="name">
<input type="submit" name="Submit" value="查找姓名">
</div>
</form>
</td>
</tr>
<tr>
<td><hr color="#99ccff" width="100%"></td>
</tr>
<tr>
<td><font color="#FF0000"><strong><br>
3.</strong></font>如你想，查找具体胸卡编号，请在下框输入胸卡编号，然后点击“查找”按钮。<font color="#FF0000">(支持模糊查询)<br>
<br>
</font></td>
</tr>
<tr>
<td><form action="user_search_result_2.asp" method="post" name="form2" target="_self" id="form2" onsubmit="return checkform2()">
<div align="center">
<input name="num" type="text" id="num">
<input type="submit" name="Submit2" value="查找胸卡编号">
</div>
</form>
</td>
</tr>
<tr>
<td><hr color="#99ccff" width="100%"></td>
</tr>
<tr>
<td> </td>
</tr>
</table></td>
</tr>
</table>
<!--#include file="inc/bot.asp" -->
</body>
</html>
<%
Recordset2.Close()
Set Recordset2 = Nothing
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -