📄 index.asp
字号:
<!--#include file="../Include/Class_Conn.asp" -->
<!--#include file="../Include/Class_Main.asp" -->
<%
Dim SQL,Rs,i,CompanyName,Comid
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="../Css/Style.css" type=text/css rel=stylesheet>
<title><%= Cls_WebName %> -- 高校就业</title>
</head>
<script language="JavaScript">
function login_check()
{
if (document.login.username.value==""){
alert("-请输入用户名-");
document.login.username.focus();
return false;
}
if (document.login.password.value==""){
alert("-请输入登陆密码-");
document.login.password.focus();
return false;
}
}
function search_check(){
if (document.theForm.key.value=="请输入高校/培训机构名称"){
alert("-请输入高校/培训机构名称-");
document.theForm.key.focus();
return false;
}
}
</script>
<body>
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td><!--#include file="../Include/Header.asp" --></td>
</tr>
</table>
<table width="956" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="4"></td>
</tr>
</table>
<table width="956" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="270" valign="top">
<table width="270" border="0" cellspacing="0" cellpadding="0" class="table2">
<tr class="td_4">
<td height="29"><font class="td_4a">会员登陆</font></td>
</tr>
<tr>
<td valign="top">
<!--#include file="../Public/MemberSession.asp" -->
</td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="5"></td>
</tr>
<tr>
<tr>
<td height="100" valign="top"> <table width="100%" border="0" cellspacing="0" cellpadding="0" class="table2">
<form action="Sch_Search_Base.asp" method="post" target="_blank" name="theForm" onSubmit="return search_check()">
<tr>
<td height="25" align="center">
<select name="properity" id="properity" style="width:140px;">
<option value="0">高校类别不限</option>
<option value="10">高等院校</option>
<option value="20">中专学校</option>
<option value="30">职业技校</option>
<option value="40">培训机构</option>
<option value="50">其他</option>
</select>
</td>
</tr>
<tr>
<td height="25" align="center">
<select style="width:140px;" name=publishdate>
<option value=0>更新日期不限</option>
<option value=1>近一天</option>
<option value=2>近二天</option>
<option value=3>近三天</option>
<option value=7>近一周</option>
<option value=14>近两周</option>
<option value=30>近一月</option>
<option value=60>近两月</option>
<option value=90>近三月</option>
</select></td>
</tr>
<tr>
<td height="25" align="center"> <input name=key style="width:140px;" id=txt_keyword2 size="16" maxlength=50 value="请输入高校/培训机构名称" onClick="this.value='';"></td>
</tr>
<tr>
<td height="25" align="center"><input type="submit" name="Submit3" value=" 开 始 搜 索 ">
</td>
</tr>
</form>
</table></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="4">
<tr>
<td></td>
</tr>
</table>
<table width="100%" border="0" cellpadding="0" cellspacing="0" class="table2">
<tr class="td_4">
<td height="29"><font class="td_4a">职场眺望</font></td>
</tr>
<tr>
<td> <%= Cls_News_List(7,8,18) %></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="4">
<tr>
<td></td>
</tr>
</table>
<table width="100%" border="0" cellpadding="0" cellspacing="0" class="table2">
<tr class="td_4">
<td height="29"><font class="td_4a">面试指导</font></td>
</tr>
<tr>
<td> <%= Cls_News_List(8,8,18) %></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="4">
<tr>
<td></td>
</tr>
</table>
<table width="100%" border="0" cellpadding="0" cellspacing="0" class="table2">
<tr class="td_4">
<td height="29"><font class="td_4a">网站调查</font></td>
</tr>
<tr>
<td>
<%
'****---------投票--------
SQL="SELECT ID,TITLE,VOTETEXT,TYPE FROM pH_Vote WHERE Lock=0"
Set Rs1=Conn.Execute(SQL)
If Not Rs1.Eof And Not Rs1.Bof Then ds4=Rs1.getrows()
Rs1.Close()
for i=0 to ubound(ds4,2)
Response.Write CreateVote(ds4(0,i),ds4(1,i),ds4(2,i),ds4(3,i))
next
%>
</td>
</tr>
</table>
</td>
<td width="5"> </td>
<td valign="top">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr valign="top">
<td width="263" height="160">
<table width="96%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="20"><img src="../Images/Person/point_title1.gif" width="16" height="16"></td>
<td><strong><u>专题报道</u></strong></td>
</tr>
</table>
<table width="96%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td colspan="2" height="5"></td>
</tr>
<%
SQL = "Select Top 1 Title,Content,FileName,Path From [pH_New_Info] Where Typeid=1 Order By DateAndTime Desc"
Set Rs = Conn.Execute(SQL)
If Rs.Eof Then
Response.Write("<tr><td colspan=""2"" height=""20"">没有相关报道</td></tr>")
Else
Title = Left(Rs("Title"),20)
Content = Left(Rs("Content"),60)
FileName = Rs("FileName")
Path = Rs("Path")
%>
<tr>
<td colspan="2" height="20"><a href="../<%= Path %>/<%= FileName %>" target="_blank"><font color="#990000"><b><u><%= Title %></u></b></font></a></td>
</tr>
<tr>
<td width="80"><img src="../Images/logo_129.jpg" width="75" height="85"></td>
<td> <%= Content %> </td>
</tr>
<tr>
<td> </td>
<td>>> <a href="../<%= Path %>/<%= FileName %>" target="_blank">查看本专题</a></td>
</tr>
<% End if
Rs.Close
%>
</table>
</td>
<td width="2" background="../Images/Person/line_v1.gif"></td>
<td>
<table width="96%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="20"><img src="../Images/Person/point_title1.gif" width="16" height="16"></td>
<td><strong><u>校园资讯</u></strong></td>
</tr>
</table>
<%= Cls_News_List(6,7,20) %></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="5"></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td bgcolor="#000000" height="1"></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="15" valign="top"><img src="../Images/Person/banner_center.gif" width="15" height="90"></td>
<td valign="top"><table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<%
SQL = "Select Top 12 * From [pH_Web_Ad] Where WebName=7 And ad_Width=100 And ad_Height=30 And DateDiff(d,BeginDate,GetDate())>=0 And DateDiff(d,EndDate,GetDate())<=0 And Websub='"&Cls_Websub&"' Order By ad_Sort Asc"
Rs.open SQL,Conn,1,1
RCount = Rs.RecordCount
For i = 1 to 3
If Rs.Eof Then Exit For
%>
<tr>
<%
For j = 1 to 4
If Rs.Eof Then Exit For
If Rs("AdClass") = 1 Then
%>
<td width="25%" height="40" align="center"> <a href="<%= "http://"&Rs("AdUrl") %>" target="_blank"><img src="../Uploadfiles/AdFile/<%= Rs("AdFile") %>" width="<%= Rs("ad_Width") %>" height="<%= Rs("ad_Height") %>" border="0"></a>
</td>
<% Else %>
<td width="25%" height="40" align="center"> <object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="<%= Rs("ad_Width") %>" height="<%= Rs("ad_Height") %>">
<param name="movie" value="../Uploadfiles/AdFile/<%= Rs("AdFile") %>">
<param name=quality value=high>
<embed src="../Uploadfiles/AdFile/<%= Rs("AdFile") %>" quality=high pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="435" height="75"></embed>
</object> </td>
<%
End if
Rs.Movenext
Next
%>
</tr>
<%
Next
Rs.Close
%>
</table></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -