📄 classlist0d.asp
字号:
<%@ Language=VBScript %>
<!--#include file=globals.asp -->
<script language="javascript">
function selectschool(curid,schoolid){
window.location.href="classlist.asp?enterdate="+curid+"&schoolid="+schoolid
}
</script>
<%
schoolid=trim(request("schoolid"))
enterdate=trim(request("enterdate"))
if enterdate="" or enterdate="0" then
temp=""
else
temp=" and enterdate = '"&enterdate&"'"
end if
set rs = createobject("ADODB.recordset")
set rss = createobject("ADODB.recordset")
provinceid=left(schoolid,2)
areaid=left(schoolid,4)
sql="select * from province where provinceid='"&provinceid&"'"
rs.open SQL,schooldb
if not rs.eof then
provincename=rs("provincename")
end if
rs.close
sql="select * from areainfo where areaid='"&areaid&"'"
rs.open SQL,schooldb
if not rs.eof then
areaname=rs("areaname")
end if
rs.close
sql="select * from schoolinfo where schoolid='"&schoolid&"'"
rs.open SQL,schooldb
if not rs.eof then
schoolname=rs("schoolname")
schooladdr=rs("schooladdr")
schoolzip=rs("schoolzip")
schoolweb=rs("schoolweb")
end if
rs.close
%>
<html>
<head>
<title>中国 创网-校友录-班级列表</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="keywords" content="同学、同学录、校友、老师、学校、班级、交流">
<STYLE type=text/css>
</STYLE>
<LINK href="scss.css" rel=stylesheet>
</head>
<body bgcolor="#FFFFFF" text="#000000" topmargin="5"><CENTER>
<!--#include file=top2.htm-->
<table border="0" cellpadding="0" cellspacing="0" width="760" align="center">
<!-- fwtable fwsrc="Untitled" fwbase="classlist.gif" fwstyle="Dreamweaver" fwdocid = "742308039" fwnested="0" -->
<tr>
<td><img src="spacer.gif" width="7" height="1" border="0"></td>
<td><img src="spacer.gif" width="121" height="1" border="0"></td>
<td><img src="spacer.gif" width="5" height="1" border="0"></td>
<td><img src="spacer.gif" width="15" height="1" border="0"></td>
<td><img src="spacer.gif" width="9" height="1" border="0"></td>
<td><img src="spacer.gif" width="7" height="1" border="0"></td>
<td><img src="spacer.gif" width="105" height="1" border="0"></td>
<td><img src="spacer.gif" width="255" height="1" border="0"></td>
<td><img src="spacer.gif" width="101" height="1" border="0"></td>
<td><img src="spacer.gif" width="100" height="1" border="0"></td>
<td><img src="spacer.gif" width="28" height="1" border="0"></td>
<td><img src="spacer.gif" width="7" height="1" border="0"></td>
<td><img src="spacer.gif" width="1" height="1" border="0"></td>
</tr>
<tr>
<td colspan="3"><img name="classlist_r1_c1" src="img/classlist_r1_c1.gif" width="133" height="45" border="0"></td>
<td><img name="classlist_r1_c4" src="img/classlist_r1_c4.gif" width="15" height="45" border="0"></td>
<td colspan="2" background="img/classlist_r1_c5.gif"> </td>
<td colspan="3" background="img/classlist_r1_c5.gif"> </td>
<td colspan="3"><img name="classlist_r1_c10" src="img/classlist_r1_c10.gif" width="135" height="45" border="0"></td>
<td><img src="spacer.gif" width="1" height="45" border="0"></td>
</tr>
<tr>
<td rowspan="7" background="img/classlist_r2_c1.gif"> </td>
<td rowspan="7" valign="top"> </td>
<td rowspan="7"><img name="classlist_r2_c3" src="img/classlist_r2_c3.gif" width="5" height="594" border="0"></td>
<td colspan="8" bordercolor="#FFFFCC" bgcolor="#FFFFCC">
<%
if Request("Page")<>"" then
Page = CLng(Request("Page"))
end if
If Page < 1 Then
Page = 1
end if
PageSize=20
sql="select count(*) as a from classinfo where schoolid = '"&schoolid&"' "&temp
rs.open SQL,schooldb,1,3
count=rs("a")
PageCount=CInt(rs("a")/PageSize+0.5)
rs.Close
%>
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="5"><%=provincename%><%=areaname%><font color=red><%=schoolname%></font>注册班级列表，共有<%=count%>个班级</td>
</tr>
</table>
</td>
<td rowspan="8" background="img/classlist_r2_c12.gif"> </td>
<td><img src="spacer.gif" width="1" height="25" border="0"></td>
</tr>
<tr>
<td colspan="4"><img name="classlist_r3_c4" src="img/classlist_r3_c4.gif" width="136" height="35" border="0"></td>
<td colspan="4" background="img/classlist_r3_c8.gif" valign="bottom"> <b><font color="#0099CC">学校列表</font></b></td>
<td><img src="spacer.gif" width="1" height="35" border="0"></td>
</tr>
<tr>
<td colspan="4"><img name="classlist_r4_c4" src="img/classlist_r4_c4.gif" width="136" height="10" border="0"></td>
<td colspan="3"><img name="classlist_r4_c8" src="img/classlist_r4_c8.gif" width="456" height="10" border="0"></td>
<td rowspan="5"> </td>
<td><img src="spacer.gif" width="1" height="10" border="0"></td>
</tr>
<tr>
<td rowspan="4" colspan="2"> </td>
<td colspan="5" rowspan="2" valign="top">
<table width="100%" border="1" cellspacing="0" cellpadding="0" align="center">
<tr>
<td bgcolor="#F6F6F6" align="center" valign="top" width="560" bordercolor="#F6F6F6">
<table width="101%" border="1" cellspacing="0" cellpadding="0" bordercolor="#CCCCCC">
<tr>
<td bordercolor="#F6f6f6">
<form name="form1" method="post" action="class/popwindow_searchout.asp" target="_blank" class="en">
同学姓名：
<input type="text" name="realname" size="9" class="cn">
学校：
<input type="text" name="schoolname" size="8" class="cn">
班级：
<input type="text" name="classname" size="8" class="cn">
入学年份：
<select name=enterdate class="cn">
<option value="0">请选择</option>
<option value="1970">1970年</option>
<option value="1971">1971年</option>
<option value="1972">1972年</option>
<option value="1973">1973年</option>
<option value="1974">1974年</option>
<option value="1975">1975年</option>
<option value="1976">1976年</option>
<option value="1977">1977年</option>
<option value="1978">1978年</option>
<option value="1979">1979年</option>
<option value="1980">1980年</option>
<option value="1981">1981年</option>
<option value="1982">1982年</option>
<option value="1983">1983年</option>
<option value="1984">1984年</option>
<option value="1985">1985年</option>
<option value="1986">1986年</option>
<option value="1987">1987年</option>
<option value="1988">1988年</option>
<option value="1989">1989年</option>
<option value="1990">1990年</option>
<option value="1991">1991年</option>
<option value="1992">1992年</option>
<option value="1993">1993年</option>
<option value="1994">1994年</option>
<option value="1995">1995年</option>
<option value="1996">1996年</option>
<option value="1997">1997年</option>
<option value="1998">1998年</option>
<option value="1999">1999年</option>
<option value="2000">2000年</option>
<option value="2001">2001年</option>
<option value="2002">2002年</option>
<option value="2003">2003年</option>
<option value="2004">2004年</option>
</select>
<input type="submit" name="Submit" value="查找" class="cn">
<%
set rs = createobject("ADODB.recordset")
set rss = createobject("ADODB.recordset")
sql="select Top 5 * from classinfo order by regdate "
rs.open SQL,schooldb
do while not rs.eof
classname=rs("classname")
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -