www.gusucode.com > 25175 学生成绩管理查询系统码程序 > ADMIN/admin_user_search.asp

    <!-- #include file="../config.asp" -->
<!-- #include file="../conn.asp"-->
<%
'====================================================================
'25175成绩查询管理系统
'powered by 25175
'=-------------------------------------------------------------------
'= 文件名称：admin_user_search.asp
'= 摘    要：学号管理文件
cj_webtit="后台管理首页 - 学号管理"
cj_webmap="<a href=admin.asp class='Class'>后台管理首页</a> - 学号管理"

'= 最后日期：2006-3.1
'====================================================================
Call admin_log
%>
<!-- #include file="admin_top.asp"-->
<!-- #include file="../images/jav2.inc" -->

<%
        xm=request.form("xm")
        xh=request.form("xh")

if xm="" and xh="" then
    response.write "当前没有符合您所查询的信息"
    Response.End
End if
 xm=request("xm")
 xh=request("xh")
set rs=server.createobject("adodb.recordset")

if request("xh")<>"" then
	 sql="select * from user where xh like'%" & xh & "%'"

elseif request("xm")<>"" then
	sql="select * from user where xm like'%" & xm & "%'"
end If

sql=sql & " order by xh desc"
'rs=conn.execute(sql)
rs.open sql,conn,1,1
totalput=rs.RecordCount
if rs.EOF and  rs.BOF then
    response.write("<script language=JavaScript>" & chr(13) & "alert('当前没有符合您所查询的信息 ');" & "history.back()" & "</script>")
	Else 
%>
<table width="300"  border="0" align="center" cellpadding="0" cellspacing="0">
      <tr>
        <td colspan="3">
            <table width="752"  border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td valign='top'>
    
      <table width="752" border='1'  align="center" cellpadding='0' cellspacing='0' bordercolor="#F0F0F0">
      <tr><form action="admin_user_search.asp" method="POST" id=form5 name=form5>
		<td align=center colspan="2">学号搜索管理</td></tr><tr><td width="50%">
				<p align="center">学号查询：<input type="text" name="xh" size="20">　<input type="submit" value="提交" name="B1"></td></form>
			<form action="admin_user_search.asp" method="POST" id=form6 name=form6><td width="50%">
				<p align="center">姓名查询：<input type="text" name="xm" size="20"><input type="submit" value="提交" name="B3"></td></form></tr></table>
<form method="POST" id=form1 name=form1>
        <table width="752" border='1'  align="center" cellpadding='0' cellspacing='0' bordercolor="#F0F0F0" id=TabDocMain>
          <tr>
            <td width="45" height="20" align=center>年级</td>
            <td width="70" height="20" align=center>班级</td>
            <td width="130" height="20" align=center>学号</td>
            <td width="77" height="20" align=center>姓名</td>
            <td width="80" height="20" align=center>密码</td>
            <td width="20" height="20" align=center></td>
            <td width="200" height="20" align=center></td>
            <td width="112" height="20" align=center></td>
          </tr>
                     <%
    do while not rs.eof
	i=0

     %>      
          <tr><td height="20" align=left width="45"><div align="center">&nbsp;<%
		  ljbj_id=rs("ljbj_id")
		  sqlljbj="select lj,bj from ljb,bjb where bjb.id ="&ljbj_id
		  Set rsljbj=conn.execute(sqlljbj)
		  lj=rsljbj(0)
		  bj=rsljbj(1)
		  response.write lj
		  rsljbj.close
		  %>&nbsp;</div></td>
            <td height="20" align=left width="70"><div align="center">&nbsp;<%=bj%>&nbsp;</div></td>
            <td height="20" align=left width="130"><div align="center">&nbsp;<%=rs("xh")%>&nbsp;</div></td>
            <td height="20" align=left width="77"><div align="center">&nbsp;<%=rs("xm")%>&nbsp;</div></td>
            <td height="20" align=left width="80" nowrap><div align="center">&nbsp;<%=rs("mm")%>&nbsp;</div></td>
            <td height="20" align=left width="20"><div align="center">&nbsp;<%=rs("sex")%>&nbsp;</div></td>
            <td height="20" align=left width="200"><div align="left">&nbsp;<%=rs("data")%>&nbsp;</div></td>
            <td height="20" align=center width="112"><a href="updata.asp?kind=user&id=<%=rs("id")%>">修改</a> | <input type="checkbox" name="answer" value="<%=rs("id")%>" id="Checkbox1">
			</td>
          </tr>
<%
    rs.movenext
    loop

rs.Close 
set rs=nothing
set conn=nothing
%>
          <tr>
            <td height="20" colspan="12">&nbsp;&nbsp;<input type="checkbox" name="chkall" value="on" onClick="checkall(this)" id="Checkbox2">
              选中所有的显示学生&nbsp;&nbsp;<input type="button" name="btnDelete" value="删除" style='font-family: 宋体; font-size: 9pt;' onClick="del()" id="Button1">&nbsp;<input type="reset" name="b" value="重置" style='font-family: 宋体; font-size: 9pt;' id="Button1">            </td>
          </tr>
        </table>
      </form>
        </td>
          <td></td>
        </tr>
    </table>

        </td>
      </tr>
</table>
<%end if%>

<!-- #include file="../inc/copyright.asp"-->