📄 student_find.asp
字号:
<head>
<STYLE type=text/css>
td,font,pre,BODY {
FONT-FAMILY: "Verdana", "Arial", "Helvetica", "sans-serif", "宋体"; FONT-SIZE: 12px
}
FORM {
FONT-FAMILY: "Verdana", "Arial", "Helvetica", "sans-serif", "宋体"; FONT-SIZE: 12px; MARGIN-BOTTOM: 0px; MARGIN-TOP: 0px
}
A {
FONT-FAMILY: "Verdana", "Arial", "Helvetica", "sans-serif", "宋体"; FONT-SIZE: 12px; TEXT-DECORATION: none
}
H4 {
FONT-FAMILY: "Verdana", "Arial", "Helvetica", "sans-serif", "宋体"; FONT-SIZE: 14px
}
HR {
COLOR: #000000; HEIGHT: 1px
}
</STYLE>
<%
set conn=server.createobject("ADODB.connection")
conn.open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath("./user.mdb")
sqlstring = "select * from student where 学号>'0' "
flag=0
if request("name")<>"" then
sqlstring=sqlstring + " and 姓名='"+request("name")+"'"
flag=1
end if
if request("sex")<>"请选择" then
sqlstring=sqlstring + " and 性别='"+request("sex")+"'"
flag=1
end if
if request("grade")<>"请选择" then
sqlstring=sqlstring + " and 入学年度='"+request("grade")+"'"
flag=1
end if
if request("class1")<>"请选择" then
sqlstring=sqlstring + " and 专业='"+request("class1")+"'"
flag=1
end if
if request("xuewei")<>"请选择" then
sqlstring=sqlstring + " and 学位='"+request("xuewei")+"'"
flag=1
end if
if request("class2")<>"请选择" then
sqlstring=sqlstring + " and 班级='"+request("class2")+"'"
flag=1
end if
if request("xuehao")<>"" then
sqlstring=sqlstring + " and 学号='"+request("xuehao")+"'"
flag=1
end if
if flag=0 then
sqlstring="select * from student"
end if
set rs=conn.execute(sqlstring)
%>
<%
if rs.eof then
response.write "对不起找不到符合条件的信息!"
response.write "<input type='button' value='重试' onclick=history.back()>"
response.end
end if
%>
</head>
<table width="584" border="0" cellspacing="0" cellpadding="0" align="center" bordercolorlight="#CCCCCC" bordercolordark="#FFFFFF" height="61" bgcolor="#F5A781">
<tr>
<td height="32" width="558" bordercolorlight="#FD6868" bordercolordark="#FF3333" valign="top">
<table border="1" width="104%" cellpadding="0" cellspacing="0" height="27" bordercolorlight="#F5A781" bordercolordark="#F3BC9E">
<tr>
<td width="100%" height="27"><b><font size="2">数学系同学录查询系统</font></b></td>
</tr>
</table>
</td>
</tr>
<tr>
<td height="24" width="558">
</td>
</tr>
<tr>
<td height="1" width="558">
<div align="center"><b><font size="5" color="#FFFFFF">学 生 资 料
查 询 结 果</font></b></div>
</td>
</tr>
</table>
<br>
<table width="700" border="1" bgcolor="#E3E3E3" align="center">
<tr bgcolor="#f5a781">
<td>
<div align="center"><font color="#FFFFFF"><b>姓名</b></font></div>
</td>
<td>
<div align="center"><font color="#FFFFFF"><b>性别</b></font></div>
</td>
<td>
<div align="center"><font color="#FFFFFF"><b>班级</b></font></div>
</td>
<td>
<div align="center"><font color="#FFFFFF"><b>学号</b></font></div>
</td>
<td>
<div align="center"><font color="#FFFFFF"><b>详细</b></font></div>
</td>
</tr>
<%
While Not rs.EOF
%>
<TR>
<td>
<div align="center"><%=rs.Fields("姓名").Value %></div>
</td>
<td>
<div align="center"><%=rs.Fields("性别").Value %></div>
</td>
<td>
<div align="center"><%=rs.Fields("入学年度").Value %>级<%=rs.Fields("专业").Value %><%=rs.Fields("学位").Value %><%=rs.Fields("班级").Value %>班</div>
</td>
<td>
<div align="center"><%=rs.Fields("学号").Value %></div>
</td>
<td>
<div align="center"><a href="detail_student_info.asp?xuehao=<%=rs.Fields("学号")%>">点击</a></div>
</td>
</TR>
<%
rs.MoveNext
Wend
%>
</table>
<%
Conn.Close
set Conn=nothing
%>
<table border="0" width="70%" align="center" cellspacing="1">
<tr>
<td width="100%"><font color="#FFFFFF">1</font></td>
</tr>
</table>
<table border="0" width="76%" align="center">
<tr>
<td width="100%">
<p align="right">
<a href="student_register2.htm">同学注册</a>|<a href="student_modify1.htm">修改资料</a>|<a href="student_find.htm">资料查询</a>
</p>
</td>
</tr>
<tr>
<td width="100%">
<hr>
</td>
</tr>
</table>
<TABLE cellSpacing=0 borderColorDark=#ffffff cellPadding=0 width=760 borderColorLight=#009900 border=0 align="center">
<TR vAlign=center align=middle>
<TD width="100%" height=2>
<p align="center"><font color="#000000">|
</font><A
onclick="this.style.behavior='url(#default#homepage)';this.setHomePage('http://');"
href="http:///">设为首页</A>| <A href="javascript:window.external.addfavorite('http://','南气数学系')">收藏我站</A>|
<a href="mailto:maths_nim@sina.com">意见建议</a>| <a href="mailto:maths_nim@sina.com">联系我们</a>| <BR>Copyright (c)
2001-2002 All right reserved
版权所有:南京气象学院数学系
维护:数学系微机中心 </p>
</TD></TR></TABLE>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -