📄 adminuser.asp
字号:
<!--#include file="odbc_connection.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>求职信息</title>
<style type="text/css">
<!--
body {
margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;
}
.style6 {font-size: 12px; color: #000000; }
-->
</style>
<link href="css/css1.css" rel="stylesheet" type="text/css">
<link href="css/table.css" rel="stylesheet" type="text/css">
<link href="css/css2.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.style9 {
font-size: 12px;
color: #6600FF;
}
.style10 {
font-size: 14px;
font-weight: bold;
color: #009900;
}
.style11 {font-size: 12px; color: #FF3300}
-->
</style>
</head>
<body bgcolor="#0F409F" text="#000000" style="scrollbar-arrow-color:#8FBFEF;scrollbar-base-color:0F3F9F; SCROLLBAR-TRACK-COLOR: #4F87CF;SCROLLBAR-3DLIGHT-COLOR: #8FBFEF; SCROLLBAR-DARKSHADOW-COLOR: #8FBFEF; SCROLLBAR-HIGHLIGHT-COLOR: #0F3F9F">
<table width="760" height="316" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td height="29" align="left" valign="top" background="images/ww3.jpg"> </td>
</tr>
<tr>
<td height="115" align="center" valign="top" background="images/ww3.jpg">
<table width="760" height="115" border="0" cellpadding="5" cellspacing="0" style="border-collapse:collapse ">
<tr align="center">
<td height="30" colspan="5"><span class="style10">个 人 求 职 应 聘 信 息</span>
<hr size="1"></td>
</tr>
<tr align="center">
<td width="180" height="30" align="left"><span class="style9"> 求职姓名</span></td>
<td width="211" height="30" align="left"><span class="style9">应聘类型</span></td>
<td width="181" height="30" align="left"><span class="style9">所属专业</span></td>
<td height="30" colspan="2" align="left"><span class="style9">发布时间</span></td>
</tr>
<% dim rs,sql
sql="select * from userinfo where make='1' order by user_date DESC"
set rs=Server.CreateObject("ADODB.RecordSet")
rs.open sql,db,1
%>
<%
Dim page_no
If Request("page_no")<=1 Then
page_no=1
session("page_no")=1
Else
page_no=Cint(Request("page_no"))
End If
rs.PageSize=16
if page_no>=rs.pagecount then
page_no=rs.pagecount
end if
session("page_no")=page_no
rs.AbsolutePage=page_no
Dim I
I=rs.PageSize
Do While Not rs.Eof And I>0
I=I-1%>
<tr align="center" class="style6">
<td height="30" align="left" class="a1"> <a href="inuser_count.asp?user=<%=rs("user")%>"><%=rs("name")%></a> <span class="style6"><%=rs("hits")%></span></td>
<td height="28" align="left"><span class="style6"><%=rs("job1")%></span> <span class="style6"><%=rs("job2")%></span></td>
<td height="28" align="left"><span class="style6"><%=rs("mylevel")%></span></td>
<td width="74" height="28" align="left"><span class="style6"><%=rs("user_date")%></span></td>
<td width="64" align="left" class="a1">[<a href="adminuser.asp?make=del&user=<%=rs("user")%>">删 除</a>] </td>
</tr>
<%rs.movenext
loop%>
</table>
</td>
</tr>
<tr>
<td height="30" align="left" valign="top" bgcolor="#0F409F"><table width="760" height="30" border="0" cellpadding="0" cellspacing="0" bgcolor="#009900">
<tr>
<td width="625" height="30" valign="top"><table width="615" height="30" border="0" cellpadding="4" cellspacing="0">
<tr align="center" valign="top">
<td width="30" height="22" class="style9"><form name="" method="post" action="">
<INPUT TYPE="HIDDEN" NAME="page_no" VALUE=<%=PageNo%>>
</form></td>
<td width="150" align="left" valign="bottom" class="style11"><strong>当前页：<%=page_no%>/<%=rs.pagecount%></strong></td>
<td width="45" align="center" valign="bottom"><a href=inuser.asp?page_no=1>第一页</a></td>
<td width="184" align="center" valign="bottom"><%dim page
page=cint(request("page_no"))
page=1
if page=1 then%>
<a href=inuser.asp?page_no=<%=page%>>上一页</a>
<%else%>
<a href=inuser.asp?page_no=<%=page-1%>>上一页</a>
<%end if%></td>
<td width="95" align="left" valign="bottom">
<%if page=rs.pagecount then%><a href=inuser.asp?page_no=<%=page%>>下一页</a><%else%>
<a href=inuser.asp?page_no=<%=page+1%>>下一页</a><%end if%></td>
<td width="63" valign="bottom"><a href=inuser.asp?page_no=<%=rs.pagecount%>>末尾页</a></td>
</tr>
</table></td>
<td width="135" align="right" valign="top"><table width="122" height="30" border="0" cellpadding="4" cellspacing="0">
<tr>
<td width="120"><form >
<select name="page_no" class="style9">
<% for i=1 to rs.pagecount%>
<option value=<%=i%>>第<%=i%>页</option>
<%next%>
</select>
<input type=submit class="style9" value="转到">
</form></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<tr>
<td height="90" align="center" valign="middle" bgcolor="#0F409F"><!--#include file="dibu.asp"--></td>
</tr>
</table>
<%make=request("make")
user=request("user")
if make="del" then
Response.Buffer=True
Sql="Delete From userinfo Where user='"&user&"' "
db.Execute(Sql)
Sqla="Delete From message Where userid='"&user&"' "
db.Execute(Sqla)
Sqlb="insert into userinfo(user) values('"&user&"')"
db.Execute(Sqlb)
response.Redirect"adminuser.asp"
end if%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -