<!--#include file="conn/conn.asp"-->
<!--#include file="config.asp"-->
<!--#include file="inc/ubbcode1.asp"-->
<%
title=replace(replace(replace(replace(request("title"),"'","‘"),"<","&lt;"),">","&gt;")," ","&nbsp;")
%>
<HTML><HEAD><TITLE><%=sitename%>-视频搜索结果</TITLE>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
<LINK 
href="images/css1.css" type=text/css rel=stylesheet><LINK 
href="images/css2.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.2900.3395" name=GENERATOR>
<style type="text/css">
<!--
.style7 {font-weight: bold}
.style2 {color: #FF0000}
.STYLE9 {color: #006600}
.STYLE10 {color: #FFFFFF}
-->
</style>
</HEAD>
<BODY background=images/wbg.gif>
<!--#include file="top.asp"-->
<TABLE cellSpacing=0 cellPadding=0 width=910 align=center bgColor=#0a253a 
border=0>
  <TBODY>
  <TR>
    <TD width=7></TD>
    <TD vAlign=top>
      <SCRIPT language=javascript>
		  function fod1(obj)
		  {
		   	//var p1 = document.getElementById("Fod_list1").getElementsByTagName("div");
			var p1 = obj.parentNode.parentNode.parentNode.parentNode;
			//alert(p1.innerHTML);
			var p11 = obj.parentNode.getElementsByTagName("div");
			var t1 = p1.getElementsByTagName("tr")[1].getElementsByTagName("ul");
			var n1 = p11.length;
			for(i=0;i<n1;i++)
			{
				if(p11[i] == obj)
				{
					p11[i].className = "s1";
					t1[i].className = "dis";
				}
				else
				{
					p11[i].className = "";
					t1[i].className = "undis";				
				}
			}
		  }
		</SCRIPT>
      
      <table width="896"  border="0" align="left" cellpadding="0" cellspacing="0" bgcolor="#2A659F">
        <tr>
          <th width="240" height="3" valign="top" scope="row"></th>
          <th width="660" valign="top" scope="row"></th>
        </tr>
        <tr>
          <th height="253" valign="top" scope="row" style="border-right:1px solid #c5e2fe;"><table cellspacing=0 cellpadding=0 width=240 border=0>
              <tbody>
                <tr>
                  <td><table width="240" border="0">
                      <TR background="images/3081602.gif">
                        <TD height=31 vAlign=bottom background="images/dv.gif" id=Fod_list1><table width="105" align="center">
                            <tr>
                              <td width="17"><IMG height=18 
            src="images/cm01.gif" width=16 align=absMiddle></span></td>
                              <td width="105"><span class="font14px font14px"><strong>视频排行榜</strong></span></td>
                            </tr>
                        </table></TD>
                      </TR>
                  </table></td>
                </tr>
                <tr>
                  <td valign="top"><table width=96% border=0 cellpadding=0 cellspacing=0>
                      <% set rs3 = Server.CreateObject("adodb.recordset")
sql3="select top 10 * from film order by hits desc , id asc"
rs3.open sql3,conn,1,1
do while not rs3.eof
%>
                      <tbody>
                        <tr>
                          <td  align=middle width=29 height=26>&nbsp;<img height=12 
                  src="images/mark02a.gif" width=16></td>
                          <td  align=left width=201><a href="dvshow.asp?id=<%=rs3("id")%>"><font color="#c5e2fe">
                            <%if len(rs3("title"))>16 then
			Response.Write left(rs3("title"),16)&"…"
		Else
			Response.Write rs3("title")
		End if%>
                          </font></a></td>
                        </tr>
                      </tbody>
                      <% rs3.movenext 
			if rs3.eof then exit do 
			loop 
			rs3.close
			%>
                  </table></td>
                </tr>
              </tbody>
            </table>
            <table cellspacing=0 cellpadding=0 width=240 border=0>
              <tbody>
                <tr>
                  <td><table width="240" border="0">
                      <tr background="images/3081602.gif">
                        <td height=31 valign=bottom background="images/dv.gif" id=Fod_list1><table width="134" align="center">
                            <tr>
                              <td width="17"><img height=18 
            src="images/cm01.gif" width=16 align=absMiddle></td>
                              <td width="105"><span class="font14px"><strong>文章排行榜</strong></span></td>
                            </tr>
                        </table></td>
                      </tr>
                  </table></td>
                </tr>
                <tr>
                  <td align=left valign="top"><table width=96% border=0 cellpadding=0 cellspacing=0>
                      <% set rs2 = Server.CreateObject("adodb.recordset")
sql2="select top 10 * from article order by hits desc , articleid asc"
rs2.open sql2,conn,1,1
do while not rs2.eof
%>
                      <tbody>
                        <tr>
                          <td  align=middle width=23 height=26>&nbsp;<img height=12 
                  src="images/mark01.gif" width=11></td>
                          <td  align=left width=207><a href="show.asp?id=<%=rs2("articleid")%>"><font color="#c5e2fe">
                            <%if len(rs2("title"))>16 then
			Response.Write left(rs2("title"),16)&"…"
		Else
			Response.Write rs2("title")
		End if%>
                          </font></a></td>
                        </tr>
                      </tbody>
                      <% rs2.movenext 
			if rs2.eof then exit do 
			loop 
			rs2.close
			set rs2=nothing
			%>
                  </table></td>
                </tr>
              </tbody>
            </table></th>
          <td align="center" valign="top" scope="row"><TABLE class=marb4 cellSpacing=0 cellPadding=0 width=100% border=0>
            <TBODY>
              <TR>
                <TD 
                height=25 align="center" valign="middle"><span class="font14px STYLE9"><strong><span class="STYLE10">视频搜索结果</span></strong></span></TD>
                </TR>
            </TBODY>
          </TABLE>
          <% set rs=server.createobject("adodb.recordset") 
              if not isempty(request("page")) then   
	          pagecount=cint(request("page"))   
              else   
	          pagecount=1   
              end if
              sql="select * from film where title like '%"&title&"%' order by id desc"
              rs.open sql,conn,1,1
			  if rs.eof and rs.bof then
			  %>
            <br>
            <font color="#000"> 对不起，没有找到您查找的视频!</font>
			
            <%else
			  rs.pagesize=6
              if pagecount>rs.pagecount or pagecount<=0 then              
              pagecount=1              
              end if              
              rs.AbsolutePage=pagecount %>
<TABLE class=L13 cellSpacing=0 cellPadding=0 
                        width="610" border=0>
  <TBODY>
    <% do while not rs.eof %>
    <TR>
      <TD width="23%" align="center"><table class=img8a cellspacing=0 cellpadding=0 
                          border=0>
        <tbody>
          <tr>
            <td><a href="dvshow.asp?id=<%=rs("id")%>"><img 
                              src="<%=rs("images")%>" width="120" height="90" border=0 class=img8></a></td>
          </tr>
        </tbody>
      </table></TD>
      <TD width="34%" align="center"><TABLE style="BORDER-COLLAPSE: collapse" cellSpacing=3 
                        cellPadding=0 width=199 align=center border=0>
        <TBODY>
          <TR>
            <TD width=193 height="20">名称：<a href="dvshow.asp?id=<%=rs("id")%>"><font color="#ffff00"><%=rs("title")%></font></a> </TD>
          </TR>
          <TR>
            <TD width=193 height="20">作者：<font color="#99FF00"><%=rs("zzname")%></font></TD>
          </TR>
          <TR>
            <TD width=193 height="20">上传时间：<%=rs("dateandtime")%></TD>
          </TR>
          <TR>
            <TD width=193 height="20">观看次数：<%=rs("hits")%></TD>
          </TR>
        </TBODY>
      </TABLE></TD>
      <TD width="43%" height="22"><table width="100%"  border="0" cellspacing="1" cellpadding="0">
        <tr>
          <td><strong><font color="#ffff00">简介：</font></strong><font color="#c5e2fe"><%=rs("content")%></font></a></td>
        </tr>
      </table></TD>
    </TR>
    <TR>
      <TD height="30" colspan="3" align="center"><img src="images/line.gif" width="610" height="1"></TD>
    </TR>
    <% i=i+1                                                                                                  
          rs.movenext                                                                                                  
          if i>=rs.pagesize then exit do 
		  loop                                                                    
         %>
  </TBODY>
</TABLE>
<table width="610" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr align="right">
    <% if rs.pagecount=1 then %>
    <td height="30" colspan="2"><font color="#000000">共 <font color="#ff0000"><%=rs.recordcount%></font> 条</font></td>
  </tr>
  <tr>
    <%else%>
    <td width="48%" height="30" align="center" valign="middle"><font color="#000000">
      <% page_start=(pagecount-1)*rs.pagesize
            if pagecount=1 then page_start=1
		    page_end=rs.pagesize*pagecount
		    if pagecount*rs.pagesize=>rs.recordcount then page_end=rs.recordcount end if%>
      <%=typemin%> 共 <strong><font color="#c5e2fe"><%=rs.recordcount%></font></strong> 篇 &nbsp;&nbsp; 第<strong><font color=#c5e2fe><%=pagecount%></font></strong>页 / 共 <strong><font color=#c5e2fe><%=rs.pagecount%></font></strong> 页</font></td>
    <td width="52%" height="30" align="right" valign="middle"><font color="#000000">
      <% response.write"<form name=go2to form method=Post action='videosearch.asp'>"                                             
		     if pagecount=1 then                                                        
			 response.write "<font color='#000064'>首页 上一页</font>&nbsp;"
			 else                                                        
             response.write "<a href=videosearch.asp?page=1&title="&title&"><font color='0000BE'>首页</font></a>&nbsp;" 
	         response.write "<a href=videosearch.asp?page="+cstr(pagecount-1)+"&title="&title&"><font color='0000BE'>上一页</font></a>&nbsp;"
			 end if                                             
             if rs.PageCount-pagecount<1 then                                                        
             response.write "<font color='#000064'>下一页 尾页</font>"                                                    
			 else                                                        
             response.write "<a href=videosearch.asp?page="+cstr(pagecount+1)+"&title="&title&"><font color='0000BE'>下一页</font></a>&nbsp;"
			 response.write "<a href=videosearch.asp?page="+cstr(rs.PageCount)+"&title="&title&"><font color='0000BE'>尾页</font></a>"           
             end if 
			response.write "<input name='title' type='hidden' value="&title&"><font color='000064'> 转到<input type='text' name='page' size=2 maxLength=3 style='font-size: 9pt; color:#0E96DF; position: relative; height: 18' value="&PageCount&">页</font>&nbsp;"                               
			response.write "<INPUT style='CURSOR: hand' type='image' onclick=check() height='15' width='24' src='images/search.gif' name='Image'>" %>
    </font></td>
  <tr>
    <td height="6" colspan="4" valign="bottom"><font color="#000000">&nbsp; </font></td>
  </tr>
  <% end if %>
</table>
<%end if%></td>
        </tr>
<%
rs.close
set rs=nothing
call CloseConn()
%>  
      </table>
      </TD>
    <TD width=8></TD>
</TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=910 align=center border=0>
  <TBODY>
    <TR>
      <TD width="5" height=6 bgColor=#0a253a></TD>
      <TD width="900" bgColor=#4A9ACD></TD>
      <TD width="5" bgColor=#0a253a></TD>
    </TR>
  </TBODY>
</TABLE>
<!--#include file="bom.asp"-->
</BODY></HTML>
