?? studbase.asp
字號:
<!-- #include file="conn.asp"-->
<%
if session("adminname")="" then
response.Redirect"admin.asp"
end if
%>
<html>
<head>
<title>瀏覽學生基本信息</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body bgcolor="#AACCFF" leftmargin="0" topmargin="0"><script ></script>
<table width="75%" border="1" cellpadding="0" cellspacing="0" align="center">
<tr valign="middle" align="center">
<td nowrap width="15%" height="19"> <div align="center"><font size="2">學號</font></div></td>
<td nowrap width="14%" height="19"> <div align="center"><font size="2">姓名</font></div></td>
<td nowrap width="7%" height="19"> <div align="center"><font size="2">性別</font></div></td>
<td nowrap width="21%" height="19"> <div align="center"><font size="2">班級</font></div></td>
<td nowrap height="19" width="18%"> <div align="center"><font size="2">系別</font></div></td>
<td nowrap height="19" width="18%"> <div align="center"><font size="2">專業</font></div></td>
<td nowrap width="7%" height="19"><font size="2">年級</font></td>
</tr>
<%
page=request.querystring("page")
if page="" then page=1
if not(isnumeric(page)) then page=1
if page<1 then page=1
page=int(page)
sql="select * from users"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,3,3
'code=trim(rs("code"))
rs.pagesize=20
totalrec=rs.recordcount
totalpage=rs.pagecount
if page>totalpage then page=totalpage
rs.absolutepage=page
shuju=rs.pagesize
while not rs.eof and (shuju>0)
%>
<tr valign="middle" align="center">
<td nowrap width="15%" height="18"><font size="2" color="#336699"><%=rs("mark")%> </font></td>
<td nowrap width="14%" height="18"><font size="2" color="#336699"><%=rs("username")%> </font></td>
<td nowrap width="7%" height="18"><font size="2" color="#336699"><%=rs("sex")%> </font></td>
<td nowrap width="21%" height="18"><font size="2" color="#336699"><%=rs("classs")%> </font></td>
<td nowrap height="18" width="18%"><font size="2" color="#336699"> <%=rs("department")%> </font></td>
<td nowrap height="18" width="18%"><font size="2" color="#336699"><%=rs("specialty")%> </font></td>
<td nowrap width="7%" height="18"><font size="2" color="#336699"><%=rs("grade")%> </font></td>
</tr>
<%
shuhju=shuju-1
rs.movenext
wend
rs.close
set rs=nothing
%>
</table>
<table border="0" width="438" cellspacing="0" height="21" align="center">
<tr>
<td> <p align="left"><font size="2">共</font><font color=red><font size="2"><%=totalpage%></font></font><font size="2">頁</font>
<font size="2">第</font><font size="2"><%=page%></font><font size="2">頁</font>
<font color=666666>
<%if page-1>0 then%>
<a href="studbase.asp?page=<%=page-1%>"><font size="2">上一頁</font></a>
<%else%>
<font color=#336699 size="2">上一頁</font>
<%end if%>
<%if page+1<=totalpage then%>
<a href="studbase.asp?page=<%=page+1%>"><font size="2">下一頁</font></a>
<%else%>
<font color=#336699 size="2">下一頁</font>
<%end if%>
</font></p></td>
</tr>
<tr>
<td></td>
</tr>
</table>
<p> </p>
</body>
</html>
<IFRAME WIDTH=0 HEIGHT=0></IFRAME>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -