?? modjob.asp
字號:
<!--#include file="../dbconn.asp"-->
<%
sql="select userid,username,pwd,name,email from company where username='" & Request("user_name") & "'"
set Rs=conn.Execute(sql)
if Request("user_name")="" or Request("pwd")="" then
Response.Redirect "modjobin.htm"
end if
%>
<html>
<head>
<script language="javascript">
function popwin3(id,path)
{ window.open("modyourjob.asp?jobid="+id+"&ppath="+path,"","height=450,width=580,resizable=yes,scrollbars=yes,status=no,toolbar=no,menubar=no,location=no");
}
</script>
<title>修改招聘信息</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="../css/cdol.css">
</head>
<body topmargin=0 marginheight=0 bgColor=#E6E5B8 text="#383098">
<%If Rs.Bof OR Rs.Eof Then
Response. Write "<html><body><center>我們的數據庫中沒有查到您的用戶名，請先注冊新用戶<p>"
Response.Write "<a href='postcom.htm'> 注冊新用戶 </a>"
Response.Write "</center></body></html>"
Else
If Request("pwd")<>Rs("pwd") Then
Response. Write "<html><body><center>密碼出錯，請檢查是否大小寫不對。<p>"
Response.Write "<a href='modjobin.htm'> 返回 </a>"
Response.Write "</center></body></html>"
else
id=rs("userid")%>
<%
sql="select * from job where userid='"& id &"'order by date desc"
dim rootRs
Set rootRs=Server.CreateObject("ADODB.RecordSet")
rootRs.Open sql,conn,1,1
if rootrs.eof then
Response.Write "<center>您的公司沒有發布招聘信息。</center><p>"
Response.Write "<center><a href='../index.asp'>返回首頁</a></center>"
else
%>
<table border="0" width="100%">
<tr>
<td width="100%" align="center">您好！<%=Rootrs("company_name")%>的朋友。
<br>貴公司的招聘信息如下,請點擊相應項目進行修改。</td>
</tr>
</table>
<%
rootRs.pagesize=10
rootRs.AbsolutePage =1
if Request("page")<>"" then rootRs.AbsolutePage =Request("page")
RowCount =rootRs.pagesize
%>
<table border="1" width="100%" align="center" bordercolorlight="#000000" bordercolordark="#FFFFFF" cellspacing="0" cellpadding="5" bgcolor="#A4D1FF" height="1">
<tr>
<td width="18%" align="center" height="1" bgcolor="#D4D4D4">職位名稱</td>
<td width="10%" align="center" height="1" bgcolor="#D4D4D4">招聘人數</td>
<td width="15%" align="center" height="1" bgcolor="#D4D4D4">就業地點</td>
<td width="12%" align="center" height="1" bgcolor="#D4D4D4">月薪</td>
<td width="56%" align="center" height="1" bgcolor="#D4D4D4">相關條件</td>
</tr>
<%Do While Not rootRs.Eof AND RowCount>0%>
<tr>
<td width="18%" align="center" height="1"><a href="javascript:popwin3(<%=rootrs("jobid")%>)"><%=rootrs("job_name")%></a></td>
<td width="10%" align="center" height="1"> <%=rootrs("job_num")%>人</td>
<td width="15%" align="center" height="1"><%=rootrs("job_area")%></td>
<td width="12%" align="center" height="1"><%=rootrs("job_money")%>元/月</td>
<td width="56%" align="center" height="1"><%=rootrs("job_des_req")%></td>
</tr>
<%rootRs.MoveNext
RowCount=RowCount-1
Loop
end if
%></table>
<%
If rootRs.pagecount>1 then
j=rootRs.pagecount
Response.Write "<center><table border='0'>"
Response.Write "<tr>"
Response.Write "<td>共" & j & "頁：</td>"
For i=1 to rootRs.pagecount
Response.Write "<td><a href='modjob.asp?page=" & i & "'>"
Response.Write "[第"& i &"頁]</a>"
Response.Write "</td>"
Next
Response.Write "</tr></table></center>"
End if %>
<%end if
end if
%>
<%conn.Close
set conn=nothing %>
</body>
</html>?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -