📄 usermyjob.asp
字号:
<!--#include file="SiteInfo.asp"-->
<%
'☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆
'★ ★
'☆ 万博中小企业网站管理系统(NWEB) ☆
'★ ★
'☆ 版权所有 Nweb.cn ☆
'★ ★
'☆ 程序制作 万博工作室 ☆
'★ Add:四川省彭州市西大街228号/611930 ★
'☆ Tel:028-88079088 Fax:83708850 ☆
'★ E-m:duolaimi-123@163.com ★
'☆ Q Q:59309100 ☆
'★ ★
'☆ 相关网址 [产品介绍]http://www.Nweb.cn ☆
'★ [支持论坛]http://www.Nweb.cn/bbs ★
'☆ ☆
'★ 演示网址 http://www.Nweb.cn ★
'☆ ☆
'★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
%>
<%
M_L=session("My_Login")
L_N=session("Uname")
if M_L="My_Login_Succeed" and L_N<>"" then
set rsID=Server.CreateObject("Adodb.Recordset")
sql = "select * from UserInfo where Uname='"&L_N&"'"
rsID.open sql,conn,1,1
if rsID.RecordCount<>0 then Uid=rsID("id")
rsID.close
set rsID=nothing
else
response.write "<script language=javascript> alert('提示：\n\n您还没有登录无权查看!');location.replace('User.asp');</script>"
response.end
end if
'=====================================
'判断是否登录查看
'=====================================
dim i,intPage,page,pre,last,filepath
set rsp = server.createobject("adodb.recordset")
productsSQL= "select * from Recommend where Uid="&Uid&" order by id desc "
rsp.PageSize = 6 '这里设定每页显示的记录数
rsp.CursorLocation = 3
rsp.Open productsSQL,conn,0,2,1 '这里执行你查询SQL并获得结果记录集
pre = true
last = true
page = trim(Request.QueryString("page"))
if len(page) = 0 then
intpage = 1
pre = false
else
if cint(page) =< 1 then
intpage = 1
pre = false
else
if cint(page)>=rsp.PageCount then
intpage = rsp.PageCount
last = false
else
intpage = cint(page)
end if
end if
end if
if not rsp.eof then
rsp.AbsolutePage = intpage
end if
%>
<HTML>
<HEAD>
<TITLE>首页-会员中心|<%=SiteName%></TITLE>
<META http-equiv="Content-Type" content="text/html; charset=gb2312">
<META NAME="copyright" CONTENT="Copyright 2004-2005 - NWEB.CN-STUDIO-多来米">
<META NAME="Author" CONTENT="万博网络技术工作室,www.Nweb.cn">
<META NAME="Robots" CONTENT="all">
<META NAME="Keywords" CONTENT="<%=Keywords%>">
<META NAME="Description" CONTENT="<%=Description%>">
<link href="Images/CSS.css" type=text/css rel=stylesheet>
</HEAD>
<BODY >
<!--#include file="Top.asp" -->
<table width="868" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="190" height="96" valign="top" bgcolor="#F2F2F2" ><!--#include file="LeftNav.asp" -->
<!--#include file="UserLeft.asp" -->
</td>
<td width="5"></td>
<td width="673" valign="top" class="Index-Center"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<!--DWLayoutTable-->
<tr>
<td height="180" colspan="2" bgcolor="#FFFFFF"><img src="Images/Banner_01.jpg" alt="万博中小企业网站系统" width="499" height="180"></td>
<td width="172" align="right" bgcolor="#FFFFFF"><img src="Images/Banner_02.jpg" alt="万博中小企业网站系统" width="171" height="180"></td>
</tr>
<tr>
<td width="93" height="5" bgcolor="#FFFFFF"></td>
<td width="408" bgcolor="#FFFFFF"></td>
<td bgcolor="#FFFFFF"></td>
</tr>
<tr>
<td height="30" align="right" bgcolor="#F2F2F2"><strong><font color="#1c529b"><img src="Images/Arrow-locality.gif" width="14" height="12" align="absmiddle"> 当前位置：</font></strong></td>
<td colspan="2" bgcolor="#F2F2F2" class="locality"><a href="index.asp">首 页</a> >> <a href="User.asp">会员中心</a> >> 我的应聘 </td>
</tr>
<tr>
<td height="5" align="center" bgcolor="#FFFFFF"></td>
<td colspan="2" align="center" bgcolor="#FFFFFF"></td>
</tr>
</table>
<table width="100%" border="0" cellpadding="0" cellspacing="0" >
<tr>
<td width="20" height="12"> </td>
<td></td>
<td width="20"></td>
</tr>
<tr>
<td height="30"> </td>
<td align="center"><%
if rsp.BOF then
response.write "<tr><td colspan='7' width='100%' height='50'' align='center'>暂无相关信息!</td>"
end if
for i=1 to rsp.PageSize
if rsp.EOF or rsp.BOF then exit for
%>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#FFFFFF" >
<tr bgcolor="#DFDFDF">
<td width="11%" height="22" align="right"> 职 位： </td>
<td colspan="4" > <%=rsp("jobname")%></td>
<td > <a href="UserMyJobShow.asp?id=<%=rsp("id")%>" target="_blank"><font color="#0033cc">查看详细...</font></a></td>
</tr>
<tr bgcolor="#DFDFDF">
<td height="22" align="right"> 应聘者： </td>
<td width="28%">
<% if rsp("Uid")>0 then
response.write "会员 | "
end if %>
<%=rsp("name")%></td>
<td width="12%" align="right">应聘时间：</td>
<td width="17%"> <%=rsp("addtime")%></td>
<td width="12%" align="right">回复时间：</td>
<td width="20%">
<% if rsp("re")<>"" then
ret=rsp("retime")
response.write ""&ret&""
else
response.write "未回复"
end if%></td>
</tr>
<tr valign="top" bgcolor="#F7F7F7">
<td height="12" colspan="6"><img src="images/Feedback_Center_01.gif" width="96" height="10"></td>
</tr>
</table>
<%
rsp.movenext
next
%></td>
<td></td>
</tr>
<tr>
<td height="40"> </td>
<td valign="bottom"><table width="100%" border="0" align="center" class='Pagination'>
<tr valign="middle">
<%if rsp.pagecount>0 then%>
<td height="20" align="center">当前页<%=intpage%>/<%=rsp.PageCount%>
<%else%>
<td height="20" align="center">当前页0/0
<%end if%>
共有<%=rsp.recordcount%>条信息 每页<%=rsp.PageSize%>条 <a href="UserMyJob.asp?page=1">首页</a> |
<%if pre then%>
<a href="UserMyJob.asp?page=<%=intpage -1%>">上页</a> |
<%end if%>
<%if last then%>
<a href="UserMyJob.asp?page=<%=intpage +1%>">下页</a> |
<%end if%>
<a href="UserMyJob.asp?page=<%=rsp.PageCount%>">尾页</a> | 转到第
<select name="select" onChange="javascript:location=this.options[this.selectedIndex].value;">
<%
for i = 1 to rsp.PageCount
if i = intpage then%>
<option value="UserMyJob.asp?page=<%=i%>"selected><%=i%></option>
<%else%>
<option value="UserMyJob.asp?page=<%=i%>"><%=i%></option>
<%
end if
next
%>
</select>
页</td>
</tr>
</table></td>
<td></td>
</tr>
<tr>
<td height="30"> </td>
<td></td>
<td></td>
</tr>
</table></td>
</tr>
</table>
<!--#include file="bot.asp" -->
</BODY>
</HTML>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -