<!--#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>
<style>
.c101 
{
	background-color:#ff6600;
	color: #ffffff;
} 
.c102 
{
	background-color:#efefef;
}
}
</style>

<script language="JavaScript" src="../js/Search.js"></script>
<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.quicksearch.btnSltFuntype1.value=="选择/修改"){
  alert("-请选择职位类别");
  //document.quicksearch.btnSltFuntype1.focus();
  return false;
 } 
 if (document.quicksearch.btnSltArea1.value=="选择/修改"){
  alert("-请选择地区");
  //document.quicksearch.btnSltArea1.focus();
  return false;
 } 
 if (document.quicksearch.btnSltIndustry1.value=="选择/修改"){
  alert("-请选择行业类别");
  //document.quicksearch.btnSltIssuedate1.focus();
  return false;
 }
  if (document.quicksearch.btnSltIssuedate1.value=="选择/修改"){
  alert("-请选择更新日期");
  //document.quicksearch.btnSltIssuedate1.focus();
  return false;
 }  
 if (document.quicksearch.key.value=="请输入关键字"){
  alert("-请输入关键字-");
  document.quicksearch.key.focus();
  return false;
 }
 }
</script>

<SCRIPT language=javascript>
<!--
buildDiv("popupArea","popupFuntype","popupSubfuntype","popupIndustry","popupIssuedate");
//-->
</SCRIPT>
<script language="JavaScript">
function csecBoard(n) 
{ 
    for(i=1;i<5;i++) 
    { 
        eval("document.getElementById('cl0"+i+"').className='c102'"); 
        eval("cbx0"+i+".style.display='none'"); 
    } 
    eval("document.getElementById('cl0"+n+"').className='c101'"); 
    eval("cbx0"+n+".style.display='block'"); 
} 
</script>

<body>
<table width="950" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <tr>
		<td><!--#include file="../Header/Person_CompanyVideo.asp" --></td>
  </tr>
</table>
<table width="950" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <tr>
    <td>
	<table width="950" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="4"></td>
        </tr>
      </table>
	  <table width="950" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td width="180" valign="top"> 
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td height="25" align="left" valign="bottom" background="../Images/Person/left10_bg.jpg" style="padding-left:10px;"> 
                  <table width="100%" border="0" cellspacing="0" cellpadding="0">
                    <tr> 
                      <td width="65" height="20" align="center" valign="bottom" bgcolor="#FFFFFF"><strong>会员登录</strong></td>
                      <td>&nbsp;</td>
                    </tr>
                  </table></td>
              </tr>
              <tr> 
                <td style="BORDER-RIGHT: #FFAC75 1px solid; BORDER-LEFT: #FFAC75 1px solid;BORDER-bottom: #FFAC75 1px solid;">
                  <!--#include file="../Public/MemberSession.asp" -->
                </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 height="25" align="left" valign="bottom" background="../Images/Person/left10_bg.jpg" style="padding-left:10px;"> 
                  <table width="100%" border="0" cellspacing="0" cellpadding="0">
                    <tr> 
                      <td width="65" height="20" align="center" valign="bottom" bgcolor="#FFFFFF"><strong>急聘职位</strong></td>
                      <td>&nbsp;</td>
                    </tr>
                  </table></td>
              </tr>
              <tr> 
                <td style="BORDER-RIGHT: #FFAC75 1px solid; BORDER-LEFT: #FFAC75 1px solid;BORDER-bottom: #FFAC75 1px solid;padding-top:2px;padding-bottom:2px;"> 
                  <div id=demo style=overflow:hidden;height:176> 
                    <div id=demo1> 
                      <TABLE width=100% border="0" align=center cellPadding=0 cellSpacing=0 id=news>
                        <% 
				  SQL = "Select Top 30 Jobid,Comid,JobName,LastUpdate_Time From [pH_Job_Base] Where BestFlag=1 And DateDiff(d,Getdate(),End_Date)>0 Order By LastUpdate_Time Desc,Jobid Desc"
				  Set Rs = Conn.Execute(SQL)
				  While Not Rs.Eof
				   Jobid           = Rs(0)
				   Comid           = Rs(1)
				   JobName         = Left(Rs(2),11)
				   LastUpdate_Time = Month(Rs(3))&"-"&Day(Rs(3))
				   %>
                        <TR> 
                          <TD vAlign=center height=22>&middot;<A  href="../Company/Info/Com_Job.asp?Comid=<%= Comid %>&Param=<%= Jobid %>" target=_blank><%= JobName %></A><Font size="1" color="#999999">[<%= LastUpdate_Time %>]</Font></TD>
                        </TR>
                        <% 
				    Rs.Movenext
				   Wend
				   Rs.Close	
				    %>
                      </TABLE>
                    </div>
                    <div id=demo2></div>
                  </div>
                  <script>
<!--
  var speed		= 15;//滚动速度
  var rows		= 22;//每行高度
  var stim		= 80; //停留时间倍数 * speed
  var stop		= 0; //初始化值，不管
  demo2.innerHTML	= demo1.innerHTML
  function Marquee(){
    if(demo.scrollTop%rows==0 && stop<=stim){
      stop++;
      return;
    }
    stop = 0;
    if(demo2.offsetTop-demo.scrollTop<=0)
      demo.scrollTop-=demo1.offsetHeight
    else{
      demo.scrollTop++
    }
  }
  var MyMar	   = setInterval(Marquee,speed)
  demo.onmouseover = function() {clearInterval(MyMar)}
  demo.onmouseout  = function() {MyMar=setInterval(Marquee,speed)}
-->
</script> </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 height="25" align="left" valign="bottom" background="../Images/Person/left10_bg.jpg" style="padding-left:10px;"> 
                  <table width="100%" border="0" cellspacing="0" cellpadding="0">
                    <tr> 
                      <td width="65" height="20" align="center" valign="bottom" bgcolor="#FFFFFF"><strong>职业指导</strong></td>
                      <td>&nbsp;</td>
                    </tr>
                  </table></td>
              </tr>
              <tr> 
                <td style="BORDER-RIGHT: #FFAC75 1px solid; BORDER-LEFT: #FFAC75 1px solid;BORDER-bottom: #FFAC75 1px solid;padding-top:2px;"><table width="100%" border="0" cellspacing="0" cellpadding="0">
                    <tr> 
                      <td><table width="98%" border="0" align="center" cellpadding="0" cellspacing="1">
                          <tr align="center"> 
                            <td width="25%" height="23" class="c101" id="cl01" onMouseOver="csecBoard(1);"><strong>简历</strong></td>
                            <td width="25%" height="23" class="c102" id="cl02" onMouseOver="csecBoard(2);"><strong>面试</strong></td>
                            <td width="25%" height="23" class="c102" id="cl03" onMouseOver="csecBoard(3);"><strong>求职</strong></td>
                            <td width="25%" height="23" class="c102" id="cl04" onMouseOver="csecBoard(4);"><strong>职场</strong></td>
                          </tr>
                        </table></td>
                    </tr>
                    <tr> 
                      <td> <div style="display:" id="cbx01"> 
                          <table width="100%" border="0" cellspacing="0" cellpadding="0">
                            <% 
SQL = "Select Top 10 Title,FileName,Path,t_Color From [pH_New_Info] Where Title <>'' And (Typeid=10) And Flag=1 Order By DateAndTime Desc"
Set Rs = Conn.Execute(SQL)
While Not Rs.Eof					
%>
                            <tr> 
                              <td height="24">&middot;<a href="../<%= Rs("Path") %>/<%= Rs("FileName") %>" target="_blank"><font color="<%= Rs("t_Color") %>"><%= Left(Rs("Title"),13) %></font></a></td>
                            </tr>
                            <% 
 Rs.Movenext
Wend
Rs.Close
 %>
                          </table>
                        </div>
                        <div style="display:none;" id="cbx02"> 
                          <table width="100%" border="0" cellspacing="0" cellpadding="0">
                            <% 
SQL = "Select Top 10 Title,FileName,Path,t_Color From [pH_New_Info] Where Title <>'' And (Typeid=11) And Flag=1 Order By DateAndTime Desc"
Set Rs = Conn.Execute(SQL)
While Not Rs.Eof					
%>
                            <tr> 
                              <td height="24">&middot;<a href="../<%= Rs("Path") %>/<%= Rs("FileName") %>" target="_blank"><font color="<%= Rs("t_Color") %>"><%= Left(Rs("Title"),13) %></font></a></td>
                            </tr>
                            <% 
 Rs.Movenext
Wend
Rs.Close
 %>
                          </table>
                        </div>
                        <div style="display:none;" id="cbx03"> 
                          <table width="100%" border="0" cellspacing="0" cellpadding="0">
                            <% 
SQL = "Select Top 10 Title,FileName,Path,t_Color From [pH_New_Info] Where Title <>'' And (Typeid=8) And Flag=1 Order By DateAndTime Desc"
Set Rs = Conn.Execute(SQL)
While Not Rs.Eof					
%>
                            <tr> 
                              <td height="24">&middot;<a href="../<%= Rs("Path") %>/<%= Rs("FileName") %>" target="_blank"><font color="<%= Rs("t_Color") %>"><%= Left(Rs("Title"),13) %></font></a></td>
                            </tr>
                            <% 
 Rs.Movenext
Wend
Rs.Close
 %>
                          </table>
                        </div>
                        <div style="display:none;" id="cbx04"> 
                          <table width="100%" border="0" cellspacing="0" cellpadding="0">
                            <% 
SQL = "Select Top 10 Title,FileName,Path,t_Color From [pH_New_Info] Where Title <>'' And (Typeid=7) And Flag=1 Order By DateAndTime Desc"
Set Rs = Conn.Execute(SQL)
While Not Rs.Eof					
%>
                            <tr> 
                              <td height="24">&middot;<a href="../<%= Rs("Path") %>/<%= Rs("FileName") %>" target="_blank"><font color="<%= Rs("t_Color") %>"><%= Left(Rs("Title"),13) %></font></a></td>
                            </tr>
                            <% 
 Rs.Movenext
Wend
Rs.Close
 %>
                          </table>
                        </div></td>
                    </tr>
                  </table></td>
              </tr>
            </table>
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td height="5"></td>
              </tr>
            </table>
            
          </td>
          <td width="5">&nbsp;</td>
          <td valign="top"> <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td width="31" height="33"><img src="../Images/mid_left.gif" width="31" height="33"></td>
                <td background="../Images/mid_bg.gif"><strong><font color="#FF6600">视频推荐</font></strong></td>
                <td width="30"><img src="../Images/mid_right.gif" width="30" height="33"></td>
              </tr>
            </table>
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td height="5"></td>
              </tr>
            </table>
            <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
              <% 
Set Rs = Server.CreateObject("ADODB.recordset")
SQL = "Select Top 8 Comid,CompanyName,Industry,Locus_Area,Locus_City,LastUpdate_Time,Video_PhotoUrl From pH_Company_Base Where Flag=1 And Nc_Video=1 And Video_Flag<>2 And DateDiff(d,Video_Date,Getdate())>=0 And DateDiff(d,Video_EndDate,Getdate())<=0 And Video_Photourl<>'' And Video_BestFlag=1 Order By LastUpdate_Time Desc"
Rs.open SQL,Conn,1,1
For i = 1 to 4
 If Rs.Eof Then Exit For
 %>
              <tr> 
                <% 
			  For j = 1 to 2
 				If Rs.Eof Then Exit For
				Comid = Rs("Comid")
				CompanyName = Left(Rs("CompanyName"),12)
				Industry = Left(Cls_Industry(Rs("Industry")),12)
				Locus_Area = Rs("Locus_Area")
				Locus_City = Rs("Locus_City")
				Video_PhotoUrl = Rs("Video_PhotoUrl")
				LastUpdate_Time = Rs("LastUpdate_Time")
			   %>
                <td width="50%"><table width="98%" border="0" cellspacing="0" cellpadding="0">
                    <tr> 
                      <td width="97" rowspan="4"> <a href="../Company/Com_VideoView.asp?Comid=<%= Comid %>" target="_blank"><img src="../UpLoadFiles/CompanyVideoPhoto/<%= Video_Photourl %>" width="90" height="75" border="0" class="photoborder"></a></td>
                      <td height="20"><a href="../Company/Info/Com_View.asp?Param=<%= Comid %>" target="_blank"><b><%= CompanyName %></b></a></td>
                    </tr>
                    <tr> 
                      <td height="20">地区：<%= Locus_Area&Locus_City %></td>
                    </tr>
                    <tr> 
                      <td height="20">行业：<%= Industry %></td>
                    </tr>
                    <tr> 
                      <td height="20">日期：<%= Month(LastUpdate_Time)&"-"&Day(LastUpdate_Time) %></td>
                    </tr>
                  </table></td>
                <% 
				  Rs.Movenext
				 Next
				 %>
              </tr>
              <tr> 
                <td colspan="3" height="6"></td>
              </tr>
              <% 
Next
Rs.Close
 %>
            </table>
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td width="17"><img src="../Images/Person/right1_left.jpg" width="17" height="24"></td>
                <td background="../Images/Person/right1_bg.jpg"><strong>最新视频</strong></td>
                <td width="11"><img src="../Images/Person/right1_right.jpg" width="11" height="24"></td>
              </tr>
            </table>
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td height="2"></td>
              </tr>
            </table>
            <table width="100%" border="0" align="center" cellpadding="0" cellspacing="1">
              <tr align="center"> 
                <td width="33%" height="25" bgcolor="f3f3f3">企业名称</td>
                <td width="30%" bgcolor="f3f3f3">行业类别</td>
                <td width="15%" height="25" bgcolor="f3f3f3">所在地区</td>
                <td width="13%" bgcolor="f3f3f3">更新日期</td>
                <td bgcolor="f3f3f3">播放</td>
              </tr>
              <% 
SQL = "Select Top 10 Comid,CompanyName,Industry,Locus_Area,Locus_City,LastUpdate_Time,Video_PhotoUrl From pH_Company_Base Where Flag=1 And Nc_Video=1 And Video_Flag<>2 And DateDiff(d,Video_Date,Getdate())>=0 And DateDiff(d,Video_EndDate,Getdate())<=0 Order By LastUpdate_Time Desc"
Set Rs = Conn.Execute(SQL)
For i = 1 to 10 
 If Rs.Eof Then Exit For
 Comid = Rs("Comid")
 CompanyName = Left(Rs("CompanyName"),12)
 Industry = Left(Cls_Industry(Rs("Industry")),12)
 Locus_Area = Rs("Locus_Area")
 Locus_City = Rs("Locus_City")
 Video_PhotoUrl = Rs("Video_PhotoUrl")
 LastUpdate_Time = FormatDateTime(Rs("LastUpdate_Time"),2)
 %>
              <tr <% If i mod 2 = 0 Then %>bgcolor="#f9f9f9"<% End if %>> 
                <td height="26" align="left"><a href="../Company/Info/Com_View.asp?Param=<%= Comid %>" target="_blank"><%= CompanyName %></a></td>
                <td height="23" align="left"><%= Industry %></td>
                <td height="23" align="center"><%= Locus_Area&Locus_City %></td>
                <td height="23" align="center"><%= LastUpdate_Time %></td>
                <td height="23" align="center"><a href="../Company/Com_VideoView.asp?Comid=<%= Comid %>" target="_blank"><img src="../Images/video2.gif" width="14" height="16" border="0"></a></td>
              </tr>
              <%
 Rs.Movenext
Next
Rs.Close
 %>
            </table>
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td align="right">[<a href="../Person/Per_Search_CompanyVideo.asp" target="_blank"><u>更多企业视频...</u></a>]&nbsp;</td>
              </tr>
            </table></td>
        </tr>
      </table>
      
      
	  </td>
  </tr>
</table>
<table width="950" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <tr>
    <td><!--#include file="../Include/Footer.asp" --></td>
  </tr>
</table>
</body>
</html>
<% 
Set Rs = Nothing
Call CloseDB
 %>
