📄 index.asp
字号:
<!--#include file="conndb.asp"-->
<html>
<head>
<link href=style.css rel=STYLESHEET type=text/css>
</head>
<script language="javascript">
function newswin(url) {
var oth="toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=yes,left=200,top=200";
oth = oth+",width=600,height=500";
var newswin=window.open(url,"newswin",oth);
newswin.focus();
return false;
}
function newOrder(url) {
var oth="toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=yes,left=200,top=200";
oth = oth+",width=500,height=150";
var newOrder=window.open(url,"newOrder",oth);
newOrder.focus();
return false;
}
</script>
<body background="pic/bg.gif" topmargin=0>
<center>
<table border="0" width="700" cellspacing="0" cellpadding="0">
<tr><td colspan="2" height="116" width="698"><!--#include file="head.htm"--></td></tr>
<tr><td width="25%" valign="top"><!--#include file="left.asp"--></td>
<td width="75%" valign="top" align="center">
<table border="1" width="100%" cellspacing="0" cellpadding="0" bordercolor="#5A8FF0">
<tr>
<td width="100%" bgcolor="#CEE7FF" height="18"> 最新加入招聘信息 </td></tr>
</table>
<table border="1" width="100%" cellspacing="0" cellpadding="0" bordercolor="#5A8FF0">
<%
Set rs = Server.CreateObject("ADODB.RECORDSET")
sql = "Select Top 10 * From Job Order By PostTime Desc"
rs.Open sql,Conn,1,3
If Not rs.EOF Then
%>
<tr>
<td>职位名称</td><td>职位类别</td><td>要求</td>
</tr>
<%
Do While Not rs.EOF
%>
<tr>
<td><a href='JobView.asp?jid=<%=rs("JobId")%>' onClick="return newswin(this.href)"><%=rs("Title")%></a></td>
<td><%=rs("Type")%></td>
<td>学历:<%=rs("Education")%> 性别:<%=rs("Sex")%> 年龄:<%=rs("Age")%> 工作年限:<%=rs("WorkTime")%></td>
</tr>
<%
rs.MoveNext
Loop
Else
Response.Write "<tr><td>暂且没有招聘信息</td></tr>"
End If
%>
</table>
<table border="1" width="100%" cellspacing="0" bordercolor="#5A8FF0">
<tr>
<td width="100%" bgcolor="#CEE7FF" height="18">
最新加入人才信息
</td>
</tr>
</table>
<table border="1" width="100%" cellspacing="0" bordercolor="#5A8FF0">
<%
Set rs = Server.CreateObject("ADODB.RECORDSET")
sql = "Select top 10 * from Person Order By PostTime Desc"
rs.Open sql,Conn,1,3
If Not rs.EOF Then
%>
<tr>
<td>姓名</td>
<td>性别</td>
<td>应聘职位</td>
<td>英语水平</td>
<td>计算机技能</td>
</tr>
<%
Do While Not rs.EOF
%>
<tr>
<td><a href="ResumeView.asp?uid=<%=rs("UserName")%>" onClick="return newswin(this.href)"><%=rs("RealName")%></td>
<td><%If rs("Sex") Then%>女<%Else%>男<%End If%></td>
<td><%=rs("AppTitle")%> </td>
<td><%=rs("English")%> </td>
<td><%=rs("Computer")%> </td>
</tr>
<%
rs.MoveNext
Loop
Else
Response.Write "<tr><td>暂且没有人才信息</td></tr>"
End If
%>
</table>
<table border="1" width="100%" cellspacing="0" bordercolor="#5A8FF0">
<tr> <td width="100%" bgcolor="#CEE7FF" height="18"> 最新加入企业信息 </td> </tr>
</table>
<table border="1" width="100%" cellspacing="0" bordercolor="#5A8FF0">
<%
Set rs = Server.CreateObject("ADODB.RECORDSET")
sql = "Select Top 5 * From Company Order By PostDate Desc"
rs.Open sql,Conn,1,3
If Not rs.EOF Then
%>
<tr>
<td>企业名称</td>
<td>地域</td>
<td>类型</td>
<td>网址</td>
</tr>
<%
Do While Not rs.EOF
%>
<tr>
<td><a href="CompView.asp?uid=<%=rs("CName")%>" onClick="return newswin(this.href)"><%=rs("Company")%></td>
<td><%=rs("Location")%> </td>
<td><%=rs("Type")%> </td>
<td><%=rs("Http")%> </td>
</tr>
<%
rs.MoveNext
Loop
Else
Response.Write "<tr><td>暂且没有企业信息</td></tr>"
End If
%>
</table>
</td>
</tr>
</table>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -