📄 admin.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%if session("password")<>"" then%>
<!--#include file="conn.asp"-->
<%
page = CLng(request("page")) '利用CLng函数把page值转换为Long型
judge=request("judge")
judge2=request("judge2")
judge3=0
sqlcmd="select * from qzjl Order By id Desc"
rs.Open sqlcmd,conn,1,2
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>后台管理</title>
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_reloadPage(init) { //reloads the window if Nav4 resized
if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
//-->
</script>
<style type="text/css">
<!--
body,td,th {
font-size: 14px;
color: #666666;
font-weight: bold;
}
body {
background-color: #99CC00;
}
a {
font-size: 14px;
color: #FFFFFF;
font-weight: bold;
}
a:link {
text-decoration: none;
color: #666666;
}
a:visited {
text-decoration: none;
color: #666666;
}
a:hover {
text-decoration: none;
color: #666666;
}
a:active {
text-decoration: none;
color: #666666;
}
.STYLE1 {
font-size: 22px;
color: #FFFFFF;
}
.STYLE2 {color: #666666}
.STYLE3 {color: #333333; }
-->
</style>
</head>
<body>
<table width="600" height="417" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#FFFF00">
<tr>
<td height="52" colspan="4" bgcolor="#3333FF"><div align="center" class="STYLE1">学生简历生成系统后台管理</div></td>
</tr>
<tr bgcolor="#CCCC66">
<td width="29" valign="top" bgcolor="#FFFF00">
<p> </p>
<p> 学</p>
<p> 生</p>
<p> 简</p>
<p> 历</p>
<p> 生</p>
<p> 成</p>
<p> 系</p>
<p> 统</p></td>
<td width="117" valign="top"><p>
<p> 管理首页</p>
<p><a href="xg.asp" class="STYLE2" > 账号密码管理</a> <br />
<br />
<a href="quit.asp" class="STYLE3" >退出后台系统</a></p>
<p> 联系我们：</p>
<p> QQ:1234567 </p></td>
<td width="6" bgcolor="#FFFF00"> </td>
<TD vAlign=top height=343 width=438>
<div align="center"><span class="STYLE2"> <B>简历列表</B></span><BR>
<%
if not (rs.EOF or rs.BOF) then '实现分页显示
rs.MoveFirst
rs.PageSize = 16
If page < 1 Then page = 1
If page > rs.PageCount Then page = rs.PageCount
rs.AbsolutePage = page
For ipage = 1 To rs.PageSize%>
</div>
<table width="100%" border="0" align="center" cellspacing="0" >
<tr>
<td class="distance" width="248" style="word-break:break-all">
<a href=jl.asp?id=<%=rs("id")%> target=_blank><%=rs("name")%>的简历</a> [<font color="#FF0000"><a href="update.asp?id=<%=rs("id")%>" target="_blank">修改</a></font>][<a href="delete.asp?id=<%=rs("id")%>" class="blue" target="delete" onClick="return Delete();"><font color="#FF0000">删除</font></a>]</td>
<%
rs.MoveNext
If rs.EOF Then Exit For
Next
%>
</tr>
</table>
<table width="100%" border="0" align="center" cellspacing="0">
<tr>
<td> 目前共有<font
color=red><%=rs.recordCount%> </font>份简历
页数：<font
color=red><%=page%> </font>/ <%=rs.PageCount%> <br>
<% page = Request.QueryString("page")
If page = 1 Then
Response.Write "<font class='white'>第1页 上1页</font>"
End If
If page <> 1 Then
Response.Write "<a href=index.asp?page=1 class='yellow'>第1页</a>"
Response.Write " <a href=index.asp?page=" & (page - 1) & " class='yellow'>上1页</a>"
End If
If page <> RS.PageCount Then
Response.Write " <a href=index.asp?page=" & (page + 1) & " class='yellow'>下1页</a>"
Response.Write " <a href=index.asp?page=" & RS.PageCount & " class='yellow'>最后1页</a>"
End If
If page = RS.PageCount Then
Response.Write " <font class='white'>下1页 最后1页</font>"
End If
%></a> </td>
</tr>
</table>
<%else%>
<table width="75%" border="0" align="center" cellspacing="0">
<tr>
<td><span class="STYLE2"> 对不起，还没有人填写简历！</span></td>
</tr>
</table>
<%end if%></TD>
</tr>
<tr bgcolor="#CCCC66">
<td height="20" colspan="4" valign="top" bgcolor="#3130FF"> </td>
</tr>
</table>
</body>
</html>
<%else
Response.Redirect "login.asp"
end if%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -