<!--#include file="../Include/Class_Conn.asp" -->
<!--#include file="../Include/Class_Main.asp" -->
<% 
'地区分站参数
Dim c_City,c_Name
If Session("c_City") = "" Then 
 Response.Redirect "../Index.asp"
 Response.End()
End if
c_City = Session("c_City")
c_Name = Session("c_Name")


'//查找课程
SQL = "Select Ncid,Schid,LessonName,AddDate,Webprice From [pH_Educate_Lesson] Where Flag=1 And Best=1 And Schid In (Select Schid From [pH_Educate_Base] Where Cityid="&c_City&") Order By Ncid Desc"
Set Rs = Server.CreateObject("Adodb.Recordset")
Rs.open SQL,Conn,1,1
Rs.Pagesize = 20
Psize       = Rs.PageSize
PCount      = Rs.PageCount
RCount      = Rs.RecordCount

PageNo = Cint(Request.QueryString("PageNo"))
If PageNo < 1 Then
 PageNo = 1
Elseif PageNo > PCount Then
 PageNo = PCount
End if
TheRecord = (PageNo-1)*Psize '//计算记录编号的基数
If Not Rs.Eof Then Rs.AbsolutePage = PageNo

 %>
<!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&" | "&c_Name&"站" %> -- 推荐培训课程</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="950" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <tr>
    <td><!--#include file="../c_Header/Educate_Lesson.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" bgcolor="#FFFFFF"> <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td height="25" align="left" valign="bottom" background="../Images/Educate/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: #418D8B 1px solid; BORDER-LEFT: #418D8B 1px solid;BORDER-bottom: #418D8B 1px solid;padding-top:2px;padding-bottom:2px;"> 
                  <!--#include file="../c_Public/Educate_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/Educate/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: #418D8B 1px solid; BORDER-LEFT: #418D8B 1px solid;BORDER-bottom: #418D8B 1px solid;padding-top:2px;padding-bottom:2px;"><table width="100%" border="0" cellspacing="0" cellpadding="0">
                    <form action="Lesson_Search.asp" method="post" target="_blank" name="theForm">
                      <tr> 
                        <td height="5" align="center"></td>
                      </tr>
                      <tr> 
                        <td height="25" align="center"> <SELECT name=properity class=txtfield id="properity" style="width:140px;">
                            <OPTION value=""  selected>--选择课程类别--</OPTION>
                            <OPTION value="企业内训">企业内训</OPTION>
                            <OPTION value="资格认证">资格认证</OPTION>
                            <OPTION value="IT培训">IT培训</OPTION>
                            <OPTION value="语言培训">语言培训</OPTION>
                            <OPTION value="学历招生">学历招生</OPTION>
                            <OPTION value="公开课">公开课</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">
              <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/Educate/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: #418D8B 1px solid; BORDER-LEFT: #418D8B 1px solid;BORDER-bottom: #418D8B 1px solid;padding-top:2px;padding-bottom:2px;"> 
                  <div id=demo style=overflow:hidden;height:110> 
                    <div id=demo1> <%= Cls_Lesson_New_City(30,13,c_City) %> </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/Educate/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: #418D8B 1px solid; BORDER-LEFT: #418D8B 1px solid;BORDER-bottom: #418D8B 1px solid;padding-top:2px;padding-bottom:2px;"><table width="90%"  border="0" align="center" cellpadding="2" cellspacing="0">
                    <%
	  
Set Rs1 = Conn.Execute("Select Top 5 LinkName,LinkUrl From [pH_FriendLink] Where State=1 And Class=0 And Cityid="&c_City&" Order By ordernum Asc")
  if not rs1.eof then
  do while not rs1.eof %>
                    <tr> 
                      <td height="15" align="left"> <a href="<%=rs1("LinkUrl")%>" target="_blank"><%=rs1("LinkName")%></a></td>
                    </tr>
                    <%rs1.movenext

loop
end if
rs1.close
%>
                  </table></td>
              </tr>
            </table></td>
          <td width="5">&nbsp;</td>
          <td valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td width="17"><img src="../Images/Educate/right1_left.jpg" width="17" height="24"></td>
                <td background="../Images/Educate/right1_bg.jpg"><table width="100%" border="0" cellspacing="0" cellpadding="0">
                    <tr> 
                      <td width="50%"><strong><font color="#333333">特惠课程</font></strong></td>
                      <td align="right">&nbsp;</td>
                    </tr>
                  </table>
                  <strong></strong></td>
                <td width="11"><img src="../Images/Educate/right1_right.jpg" width="11" height="24"></td>
              </tr>
            </table>
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td height="10"></td>
              </tr>
            </table>
            <table width="99%" border="0" align="center" cellpadding="2" cellspacing="0">
              <% 
For i = 1 to Psize
 If Rs.Eof Then Exit For
 Lessonid = Rs("Ncid")
 Schid = Rs("Schid")
 LessonName = Rs("LessonName")
 AddDate = Month(Rs("AddDate"))&"-"&Day(Rs("AddDate"))
 Webprice = Rs("Webprice")
 %>
              <tr> 
                <td>&middot;<a href="Info/Lesson.asp?Schid=<%= Schid %>&Param=<%= Lessonid %>" target="_blank"><%= LessonName %></a> <font color="#666666">￥<%= Webprice %>元</font></td>
                <td width="100" align="right"><font color="#666666"><%= AddDate %></font></td>
              </tr>
              <% 
 Rs.Movenext
Next

 %>
            </table>
            <table width="99%" border="0" align="center" cellpadding="0" cellspacing="0">
              <tr> 
                <td height="2"></td>
              </tr>
            </table>
            <table width="99%" border="0" align="center" cellpadding="4" cellspacing="0">
              <tr> 
                <td width="50%" height="25">共<font color="#FF0000"><%= RCount %></font>条 分<font color="#FF0000"><%= PCount %></font>页 | 当前第<font color="#FF0000"><%= PageNo %></font>页</td>
                <td width="50%" align="right"> <% 
		  If PageNo > 1 Then
		   Response.write "<a href=""?PageNo=1"">首页</a>&nbsp;"
		   Response.write "<a href=""?PageNo="&PageNo-1&""">上页</a>&nbsp;"    
		  Else
		   Response.write "首页&nbsp;"
		   Response.write "上页&nbsp;" 
		  End if
		  If PageNo < PCount Then
		   Response.write "<a href=""?PageNo="&PageNo+1&""">下页</a>&nbsp;"
		   Response.write "<a href=""?PageNo="&PCount&""">尾页</a>"   
		  Else
		   Response.write "下页&nbsp;"
		   Response.write "尾页" 
		  End if
		   %> </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="../c_Include/Footer.asp" --></td>
  </tr>
</table>
</body>
</html>
<% 

'//关闭数据库连接
CloseDB
 %>
