<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<%
'open mdb 是否为soso
if request.querystring("so")=1 then
'关键字设定
aoo=request.Form("a")
ao=trim(aoo)
'当OR等于0时 按作品名搜索
if request.form("or")=0 then
Set rs = Server.CreateObject("ADODB.Recordset")
   strSQL = "select * from flash where name like '"&ao&"' order by time desc;"
   rs.open strsql,strCon,1,3 
Set rshot = Server.CreateObject("ADODB.Recordset")
   strSQL = "select * from flash order by hot desc;"
   rshot.open strsql,strCon,1,3 
pathname="搜索结果"
pathid=""
else 
'当OR=1时，按作者搜索
Set rs = Server.CreateObject("ADODB.Recordset")
   strSQL = "select * from flash where marker like '"&ao&"' order by time desc;"
   rs.open strsql,strCon,1,3 
Set rshot = Server.CreateObject("ADODB.Recordset")
   strSQL = "select * from flash order by hot desc;"
   rshot.open strsql,strCon,1,3 
pathname="搜索结果"
pathid=""
end if
else
'open mdb ok
if request.QueryString("path")="" then 
Set rs = Server.CreateObject("ADODB.Recordset")
   strSQL = "select * from flash order by time desc;"
   rs.open strsql,strCon,1,3
Set rshot = Server.CreateObject("ADODB.Recordset")
   strSQL = "select * from flash order by hot desc;"
   rshot.open strsql,strCon,1,3 
pathname="所有"
pathid=""
else
pathid=request.QueryString("path")
Set rs = Server.CreateObject("ADODB.Recordset")
   strSQL = "select * from flash where pathid like '"&pathid&"' order by time desc;"
   rs.open strsql,strCon,1,3
Set rshot = Server.CreateObject("ADODB.Recordset")
   strSQL = "select * from flash where pathid like '"&pathid&"' order by hot desc;"
   rshot.open strsql,strCon,1,3
Set rspath = Server.CreateObject("ADODB.Recordset")
   strSQL = "select * from path where id like '"&pathid&"';"
   rspath.open strsql,strCon,1,3
pathname=rspath("pathname")
end if 
end if
'是否为空
if rs.recordcount=0 then
response.redirect "msg.asp?id=1"
end if
'分页设置
Count=RS.RecordCount
If Count/10 > (Count\10) then
TotalPage=(Count\10)+1 
else TotalPage=(Count\10)
End If

PageCount= 0
RS.MoveFirst
if Request.QueryString("ToPage")<>"" then PageCount = cint(Request.QueryString("ToPage"))
if PageCount <=0 then PageCount = 1
if PageCount > TotalPage then PageCount = TotalPage
RS.Move (PageCount-1) * 10
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>千纸鹤动漫</title>
<link href="main.css" rel="stylesheet" type="text/css">
</head>


<body topmargin="0">
<table width="758" height="1800" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor=#c8e485 >
  <tr> 
    <td width="176" valign="top"> 
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td width="45"><img src="images/tp_s.gif" width="45" height="38"></td>
          <td width="122" background="images/tp_bg.gif"><strong><font color="#FFFFFF">动画搜索</font></strong></td>
          <td width="11"><img src="images/tp_end.gif" width="11" height="38"></td>
        </tr>
      </table>
      <table width="176" height="60" border="1" cellpadding="0" cellspacing="0" bordercolor="#FCD5BC">
        <form name="form2" method="post" action="list.asp?so=1">
          <tr> 
            <td colspan="2" align="center" bordercolor="#E8E8E8"> 
              <table width="100%" height="29" border="0" cellpadding="0" cellspacing="0">
                <tr> 
                  <td align="center"><img src="images/zoomer.gif" width="25" height="26"> 
                    <select name="or" id="or">
                      <option value="0" selected>按作品名搜索</option>
                      <option value="1">按作者搜索</option>
                    </select></td>
                </tr>
              </table>
              <table width="100%" height="25" border="0" cellpadding="0" cellspacing="0">
                <tr> 
                  <td width="0" align="right">关键字：</td>
                  <td width="0"> <input name="a" type="text" id="a4" size="10"> 
                  </td>
                </tr>
              </table>
              <table width="100%" height="28" border="0" cellpadding="0" cellspacing="0">
                <tr> 
                  <td align="center"> <input type="submit" name="Submit3" value="搜索"> 
                  </td>
                </tr>
              </table></td>
          </tr>
        </form>
      </table>
      <table width="178" height="0" border="0" cellpadding="0" cellspacing="0">
        <tr> 
          <td><img src="images/blank.gif" width="5" height="4"></td>
        </tr>
      </table>
      <table width="176" height="20" border="0" cellpadding="0" cellspacing="0">
        <tr> 
          <td width="11" height="20" background="images/bg_bar.gif"><img src="images/bg_bar.gif" width="10" height="21"></td>
          <td width="28" align="center" background="images/bg_bar.gif"><strong><img src="images/buy_icon.gif" width="5" height="5"></strong><font color="#FF0000">&nbsp;</font></td>
          <td background="images/bg_bar.gif"><strong><%=pathname%>得票排行</strong></td>
        </tr>
      </table>
      <table width="176" height="0" border="1" cellpadding="0" cellspacing="0" bordercolor="#CCCCCC">
        <tr> 
          <td colspan="2" align="center" valign="top" bordercolor="#E8E8E8"> <table width="100%" height="25" border="0" cellpadding="0" cellspacing="0">
              <% do while not(rshot.eof or err) and d<25 '开始循环 %>
              <tr> 
                <td width="29" height="25" align="center"><img src="images/box2_icon.gif" width="4" height="6"></td>
                <td width="143" height="25" valign="middle"><a href="show.asp?id=<%=rshot("id")%>"><%=rshot("name")%></a>(<font color="#FF6600"><img src="images/t_cash.gif" width="18" height="18"><%=rshot("hot")%></font>)</td>
              </tr>
              <% 
			  d=d+1 
			  rshot.movenext 
			  loop%>
            </table>
            <table width="70%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td>　</td>
              </tr>
            </table></td>
        </tr>
      </table> </td>
    <td width="605" valign="top"> <table width="178" height="0" border="0" cellpadding="0" cellspacing="0">
        <tr> 
          <td><img src="images/blank.gif" width="5" height="10"></td>
        </tr>
      </table>
      <table width="580" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr> 
          <td width="10" background="images/bg_bar.gif"><img src="images/bg_bar.gif" width="10" height="21"></td>
          <td width="19" background="images/bg_bar.gif"><img src="images/t_else5.gif" width="19" height="19"></td>
          <td width="96" background="images/bg_bar.gif"><a href="list.asp?path=1"><strong>超级闪客秀</strong></a></td>
          <td width="19" background="images/bg_bar.gif"><img src="images/t_else5.gif" width="19" height="19"></td>
          <td width="94" background="images/bg_bar.gif"><strong><a href="list.asp?path=2">MV男歌手</a></strong></td>
          <td width="19" background="images/bg_bar.gif"><img src="images/t_else5.gif" width="19" height="19"></td>
          <td width="94" background="images/bg_bar.gif"><strong><a href="list.asp?path=3">MV女歌手</a></strong></td>
          <td width="19" background="images/bg_bar.gif"><img src="images/t_else5.gif" width="19" height="19"></td>
          <td width="95" background="images/bg_bar.gif"><strong><a href="list.asp?path=4">动画短片</a></strong></td>
          <td width="19" background="images/bg_bar.gif"><img src="images/t_else5.gif" width="19" height="19"></td>
        
        <tr> 
          <td colspan="11"><img src="images/blank.gif" width="5" height="8"></td>
        </tr>
      </table>
      <table width="100%" height="18" border="0" cellpadding="0" cellspacing="0">
        <tr> 
          <td width="4%"><img src="images/item.gif" width="19" height="19"></td>
          <td width="96%"><a href="index.asp">千纸鹤 动漫</a>-=&gt; <a href="list.asp">动画列表</a> 
            -&gt;&gt; <font color="#9966CC"><strong><%=pathname%></strong></font></td>
        </tr>
      </table>
      <table width="178" height="0" border="0" cellpadding="0" cellspacing="0">
        <tr> 
          <td><img src="images/blank.gif" width="5" height="8"></td>
        </tr>
      </table>
      <table width="550" height="0" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr> 
          <td height="7" colspan="5"><img src="images/h_top.gif" width="550" height="7"></td>
        </tr>
        <tr> 
          <td width="7" height="7" background="images/h_l.gif">　</td>
          <td width="111" height="0" bgcolor="#FFFFFF"><a href="list.asp?topage=<%=PageCount-1%>&path=<%=pathid%>">[上一页]</a> 
            <a href="list.asp?topage=<%=PageCount+1%>&path=<%=pathid%>">[下一页]</a></td>
          <td width="263" align="center" bgcolor="#FFFFFF"> <font color="#9966CC"><strong><%=pathname%></strong></font>中共有<font color="#FF6600"><%=Count%></font>个动画 
          </td>
          <td width="162" align="right" bgcolor="#FFFFFF">第<font color="#009900"> 
            <% =PageCount %>
            </font> 页 /共 <font color="#009900"> 
            <% =TotalPage %>
            </font>页</td>
          <td width="7" height="7" background="images/h_r.gif"><img src="images/h_r.gif" width="7" height="6"></td>
        </tr>
        <tr> 
          <td height="7" colspan="5"><img src="images/h_down.gif" width="550" height="7"></td>
        </tr>
      </table>
      <table width="550" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr> 
          <td align="center">跳转到&lt; <strong> 
            <% 
 for i=1 to TotalPage
  If i<>PageCount then
  Response.Write "<font color=black></font><a href=list.asp?topage="& i &"&path="& pathid &"><font color=#3C9625>" & i & "</font></a><font color=black></font>" 
  else
  Response.Write "<font color=black></font><font color=#000000>"&i&"</font><font color=black></font>"
  end if
 next
 %>
            </strong>&gt;页</td>
        </tr>
      </table>
	  <%'star loop
	  do while not(rs.eof or err) and a<10 '开始循环 
	  %>
      <table width="550" height="0" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr> 
          <td height="7" colspan="3"><img src="images/h_top.gif" width="550" height="7"></td>
        </tr>
        <tr> 
          <td width="7" height="0" background="images/h_l.gif"><img src="images/h_l.gif" width="7" height="33"></td>
          <td width="554" height="0"> 
            <TABLE width="100%" height="84" border=1 align="center" cellPadding=3 cellSpacing=0 
      borderColorLight=#84b6de borderColorDark=#ffffff bgColor=#ffffff >
              <tr> 
                <td width="130" rowspan="3"> <TABLE border=0 cellPadding=0 cellSpacing=0 width=119>
                    <TBODY>
                      <TR> 
                        <TD colSpan=3><IMG alt="" height=10 
                  src="images/3_01.gif" width=119></TD>
                      </TR>
                      <TR> 
                        <TD><IMG alt="" height=80 src="images/3_02.gif" 
                width=9></TD>
                        <TD bgColor=#ffffff height=80 
                width=0><a href="show.asp?id=<%=rs("id")%>" 
                  ><img src="<%=rs("img")%>" 
                width=101 height=80 
                  border=0></a></TD>
                        <TD><IMG alt="" height=80 src="images/3_04.gif" 
                width=9></TD>
                      </TR>
                      <TR> 
                        <TD colSpan=3><IMG alt="" height=5 src="images/3_05.gif" 
                  width=119></TD>
                      </TR>
                      <TR align="center"> 
                        <TD background=images/3_05.gif colSpan=3 
                height=17><a href="show.asp?id=<%=rs("id")%>"><strong><font color="#9966cc"><%=rs("name")%></font></strong></a></TD>
                      </TR>
                      <TR> 
                        <TD colSpan=3><IMG src="images/3_10.gif" 
              width=119></TD>
                      </TR>
                    </TBODY>
                  </TABLE></td>
                <td width="176" height="20">所在位置: <font color="#9966CC"><%=rs("pathname")%></font></td>
                <td>作者: <%=rs("marker")%></td>
              </tr>
              <tr> 
                <td height="10">时间:<%=rs("time")%>　　</td>
                <td height="10">大小:<%=rs("size")%>K　人气：<font color="#FF6666"><%=rs("hot")%></font>　得票:<font color="#FF6666"><%=rs("hot")%></font></td>
              </tr>
              <tr> 
                <td colspan="2">动画简介: <%=rs("txt")%></td>
              </tr>
            </table>
          </td>
          <td width="2" height="0" background="images/h_r.gif"><img src="images/h_r.gif" width="7" height="6"></td>
        </tr>
        <tr> 
          <td height="7" colspan="3"><img src="images/h_down.gif" width="550" height="7"></td>
        </tr>
      </table>
      
      <table width="98%" height="0" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr> 
          <td><img src="images/blank.gif" width="5" height="8"></td>
        </tr>
      </table>
	  <%'end loop
	  a=a+1
	  rs.movenext
	  loop
	  %>
      <table width="550" height="0" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr> 
          <td height="7" colspan="5"><img src="images/h_top.gif" width="550" height="7"></td>
        </tr>
        <tr> 
          <td width="7" height="7" background="images/h_l.gif">　</td>
          <td width="111" height="0" bgcolor="#FFFFFF"><a href="list.asp?topage=<%=PageCount-1%>&path=<%=pathid%>">[上一页]</a> 
            <a href="list.asp?topage=<%=PageCount+1%>&path=<%=pathid%>">[下一页]</a></td>
          <td width="263" align="center" bgcolor="#FFFFFF"> <font color="#9966CC"><strong><%=pathname%></strong></font>类共有<font color="#FF6600"><%=Count%></font>个动画 
          </td>
          <td width="162" align="right" bgcolor="#FFFFFF">第<font color="#009900"> 
            <% =PageCount %>
            </font> 页 /共 <font color="#009900"> 
            <% =TotalPage %>
            </font>页</td>
          <td width="7" height="7" background="images/h_r.gif"><img src="images/h_r.gif" width="7" height="6"></td>
        </tr>
        <tr> 
          <td height="7" colspan="5"><img src="images/h_down.gif" width="550" height="7"></td>
        </tr>
      </table></td>
  </tr>
</table>
  <center>
 </body>
</html>