www.gusucode.com > 玩玩小游戏FLASH系统 2.1码程序 > search.asp
<!--#include File="Conn.asp"-->
<%
if request("key")="" then
response.write "关键字不能为空"
response.end
else
key=trim(request("key"))
key=replace(key,"'","")
if len(key)<2 then
response.write"关键字不可小于2位字符"
response.end
end if
%>
<html>
<head>
<TitlE>在线玩小游戏 -游戏搜索</title>
<link href="yes/css.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.a21 { BORDER-RIGHT: #0C8FFF 1px solid; BORDER-TOP: #0C8FFF 1px solid; FONT-SIZE: 12px; BACKGROUND: #0C8FFF; BORDER-LEFT: #0C8FFF 1px solid; CURSOR: hand; COLOR: #ffffff; BORDER-BOTTOM: #0C8FFF 0px solid
}
-->
</style>
</head>
<STYLE type=text/css>
.a1 {
BORDER-RIGHT: 1px solid; BORDER-TOP: 1px solid; FONT-SIZE: 12px; BACKGROUND: #ffffff; BORDER-LEFT: 1px solid; CURSOR: hand; COLOR: #000000; BORDER-BOTTOM: 0px solid
}
.a2 {
BORDER-RIGHT: #ff6a03 1px solid; BORDER-TOP: #ff6a03 1px solid; FONT-SIZE: 12px; BACKGROUND: #ff6a03; BORDER-LEFT: #ff6a03 1px solid; CURSOR: hand; COLOR: #ffffff; BORDER-BOTTOM: #ff6a03 0px solid
}
.style6 {color: #FF0000}
</STYLE>
<body>
<div align="center">
<table width="970" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="226" height="95" valign="middle"><div align="center"><IMG src="img/logo.gif" width="226" height="121"
border=0 usemap="#Map"></div></td>
<td valign="middle" background="img/logo-1.gif"><table width="100%" height="121" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="21" valign="bottom"><div align="right">
<table width="100%" height="20" border="0" cellpadding="1" cellspacing="0">
<tr>
<td width="354"></td>
<td width="379" valign="bottom"><div align="right"><a href="http://www.xunlei-bt.com" target="_blank">黄鹤影院</a>丨<a href="http://d.hhzone.net" target="_blank">动漫</a>丨<a href="http://www.hhzone.net/bbs.php" target="_blank">娱乐社区</a>丨<a href="http://www.hhzone.net/x/" target="_blank">聚合\博客</a></div></td>
<td width="10"></td>
</tr>
</table>
</div></td>
</tr>
<tr>
<td valign="bottom"><table width="720" height="90" border="0" align="right" cellpadding="0" cellspacing="0">
<tr>
<td width="970" valign="bottom"><script type="text/javascript"
src="/go/728_90.js"></script>
</script></td>
</tr>
</table></td>
</tr>
</table></td>
<td width="1" valign="middle" background="img/logo-2.gif"></td>
</tr>
</table>
<map name="Map">
<area shape="rect" coords="9,4,77,20" A class=Bottom onClick="this.style.behavior='url(#default#homepage)';this.setHomePage('http://game.hhzone.net/');" href="#">
<SPAN class=Bottom_Adminlogo>
<area shape="rect" coords="83,4,142,21" title=将本站加入到你的收藏夹 href="javascript:window.external.AddFavorite(location.href,document.title)">
</map>
</div>
<table width="972" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor=#FFFFFF>
<form name="form1" method="post" action="search.asp">
<tr>
<td align=center class=a21><a href=index.html target=_blank class=m><strong>首 页</strong></a></td>
<%
Set Rs=Server.Createobject("Adodb.Recordset")
Sql="Select * From class where classid='0'"
Rs.open Sql,Conn,1,1
Do While not Rs.Eof
%>
<td class=a21 height=25 align=center><a href=class/<%=rs("id")%>_1.htm target=_blank class=m><strong><%=rs("name")%></strong></a></td>
<%
Rs.Movenext
Loop
Rs.Close
Set Rs=nothing
%>
</tr>
</form>
</table>
<div align="center"></div>
<table width="970" height="50" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><TABLE cellSpacing=0 cellPadding=0 width=970 align=center border=0>
<FORM name=forms action=../search.asp method=post>
<TBODY>
<TR>
<TD align=middle width=91
background="yes/sebg.gif"
height=41><div align="center" class="STYLE10">·站内搜索</div></TD>
<TD width=100 align="right"
background="yes/sebg.gif"><div align="center">
<INPUT name=key
class=a id=key size="38">
</div></TD>
<TD width=54 align=center
background="yes/sebg.gif"><INPUT
type=image height=19 width=46
src="yes/searh2.gif" border=0
name=imageField></TD>
<TD
background="yes/sebg.gif"><TABLE cellSpacing=0 cellPadding=4 width="98%" align=right border=0>
<TBODY>
<TR>
<TD><div align="center" class="STYLE10">在线玩小游戏 Game.HHzone.Net
欢迎您!</div></TD>
<TD width="30"><div align="center"><IMG height=17
src="../indeximg/finger.gif" width=20></div></TD>
<TD width="130"><A style="BEHAVIOR: url(#default#homepage)"
onclick="this.style.behavior='url(#default#homepage)';this.setHomePage('http://game.hhzone.net/');return(false);"
href="#">下次自动访问小游戏站</A></TD>
</TR>
<TR></TR>
</TBODY>
</TABLE></TD>
</TR>
</FORM>
</TABLE></td>
</tr>
</table>
<table width="970" height="500" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#B9E3FF">
<tr>
<td width="970" valign="top" bgcolor="#FFFFFF"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="345"><table width="100%" height="30" border="0" cellpadding="0" cellspacing="2">
<tr>
<td bgcolor="#CEECFF"><span class="bga"> 您在wwxyx.com的位置：<a class="a" href="../index.htm">首页</a>>> 站内搜索 >> 关键字 "<font color=red><%=(key)%></font>" </span></td>
</tr>
</table>
<br>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="10">
<%
Page=Request("Page")
PageSize = 20
Set Rs=Server.Createobject("Adodb.Recordset")
Sql="Select * From flash where flashname Like '%"&key&"%' order by id desc"
Rs.open Sql,Conn,1,1
if rs.eof and rs.bof then
response.write"<tr><td align=center>没有找到任何FLASH</td></tr>"
else
Rs.PageSize = PageSize
flashnum=Rs.RecordCount
Pgnum=Rs.Pagecount
If Page="" or Clng(Page)<1 Then Page=1
If Clng(Page) > Pgnum Then Page=Pgnum
If Pgnum>0 Then Rs.AbsolutePage=Page
Count=0
Do While not Rs.Eof And Count<Rs.PageSize
%>
<tr>
<td width="149" valign="middle"><div align="center">
<table width="108" height="82" border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#D4D4D4">
<tr>
<td bgcolor="#FFFFFF"><div align="center"><a href="flash/7327.htm" target="_blank"></a><a href="flash/<%=rs("id")%>.htm" target="_blank"><img src="<%=rs("pic")%>" width=104 height="76" border="0" heigh=50></a><a href="flash/7327.htm" target="_blank"></a><a href="flash/7595.htm" target="_blank"></a><a href="flash/7577.htm" target="_blank"></a></div></td>
</tr>
</table>
</div></td>
<td width="816" valign="bottom"> <a href=flash/<%=rs("id")%>.htm target=_blank><%=rs("flashname")%></a><br>
<%=left(rs("body"),70)%>(略) </td>
</tr>
<tr>
<td height="1" colspan="2" valign="top"><hr style='BORDER-BOTTOM-STYLE: dotted; BORDER-LEFT-STYLE: dotted; BORDER-RIGHT-STYLE: dotted; BORDER-TOP-STYLE: dotted' color=#999999 size=1></td>
</tr>
<%
Rs.Movenext
Count=Count+1
Loop
%>
</table></td></tr>
<tr>
<td><TABLE height=35 cellSpacing=2 cellPadding=0 width=100% align=center
border=0>
<TBODY>
<TR>
<TD bgcolor="#CEECFF"><div align="center">
<%
Response.Write "<Form Method=""Post"" action=""search.asp"">"
Response.Write "[第<Font Color=#FF0000>"& Page &"</font>页/共"& pgnum &"页] "
If Page=1 Then
Response.Write "[首 页] [上一页] "
Else
Response.Write "[<a href=""search.asp?key="&key&"&Page=1"">首 页</a>] "
Response.Write "[<a href=""search.asp?key="&key&"&Page="& Page-1 &""">上一页</a>] "
End If
If Rs.PageCount-Page<1 Then
Response.Write "[下一页] [尾 页]"
Else
Response.Write "[<a href=""search.asp?key="&key&"&Page="& Page+1 &""">下一页</a>] "
Response.Write "[<a href=""search.asp?key="&key&"&Page="& Rs.PageCount &""">尾 页</a>]"
End If
Response.Write " 共[<Font Color=#FF0000>"& flashnum &"</font>]部flash"
Response.Write " 转到：<Input Type='Text' Name=""Page"" Size=2 Maxlength=10 value="""& Page &""" align=""center"">"
Response.Write "<Input Type=""Submit"" value=""Goto"" Size=2 Name=""Submit"">"
Rs.Close
Set Rs=nothing
conn.close
set conn=nothing
end if
%>
</div></TD>
</TR>
</TBODY>
</TABLE></td>
</tr>
</table></td>
</tr>
</table>
<div align=center>
<div align="center">
<table width="970" height="138" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td valign="bottom"><table width="970" height="130" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><table width="100%" border="0" align="center" cellpadding="1" cellspacing="1" bgcolor="#B9E3FF">
<tr>
<td width="970" valign="top" bgcolor="#FFFFFF"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="28" valign="top"><table width="100%" height="28" border="0" cellpadding="0" cellspacing="1">
<tr>
<td bgcolor="#B9E3FF"><div align="center"><a href="../gywm.htm" target="_blank">关于我们</a> | <a href="../lxwm.htm" target="_blank">联系我们</a> | <a href="../fwsm.htm" target="_blank">服务声明</a> | <a href="../ggsw.htm" target="_blank">广告事务 </a></div></td>
</tr>
</table></td>
</tr>
<tr>
<td height="100"><div align="center">
<table width="90%" height="60" border="0" cellpadding="0" cellspacing="0">
<tr>
<td><div align="center">作品版权归作者所有，如果无意之中侵犯了您的版权，请来信告知，在线玩小游戏网将在3个工作日内删除！</div></td>
</tr>
<tr>
<td colspan="2"><div align="center"><a href="http://www.hhzone.net/">黄鹤娱乐</a> 管理员邮箱：hhzone.cn#163.com ,黄鹤娱乐QQ群：3500695 ,设计维护：<a href="http://www.2wwu.cn" target="_blank">2wwu.cn</a></div></td>
</tr>
<tr>
<td><div align="center">
<script src='http://s111.cnzz.com/stat.php?id=952344&web_id=952344&show=pic' language='JavaScript' charset='gb2312'></script>
</div></td>
</tr>
</table>
</div></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
</div>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor=#ffffff>
<tr> </tr>
</table>
</div>
</body>
</html>
<%end if%>