?? search.asp
字號:
<!--#include File="Conn.asp"-->
<%
if request("key")="" then
response.write "關(guān)鍵字不能為空"
response.end
else
key=trim(request("key"))
key=replace(key,"'","")
if len(key)<2 then
response.write"關(guān)鍵字不可小于2位字符"
response.end
end if
%>
<html>
<head>
<TitlE>玩玩小游戲 </title>
<link href="yes/css.css" rel="stylesheet" type="text/css">
</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="741" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="95" valign="middle"><div align="center">
<table width="50" height="50" border="0" cellpadding="0" cellspacing="0">
<tr>
<td><div align="center"><A href="http://www.wwxyx.com/mms.htm" target="_blank"><IMG src="http://www.wwxyx.com/img/6.gif"
border=0></A></div></td>
</tr>
</table>
<a href="http://www.wwxyx.com/mms.htm" target="_blank">彩信下載</a></div></td>
<td valign="middle"><div align="center">
<table width="50" height="50" border="0" cellpadding="0" cellspacing="0">
<tr>
<td><div align="center"><A href="http://mp3.xxyule.com" target="_blank"><IMG src="http://www.wwxyx.com/img/2.gif"
border=0></A></div></td>
</tr>
</table>
<a href="http://mp3.xxyule.com" target="_blank">星星音樂</a></div></td>
<td valign="middle"><div align="center">
<table width="50" height="50" border="0" cellpadding="0" cellspacing="0">
<tr>
<td><div align="center"><SPAN class=Bottom_Adminlogo><A class=Bottom onClick="this.style.behavior='url(#default#homepage)';this.setHomePage('http://www.wwxyx.com/');" href="#"><IMG src="http://www.wwxyx.com/img/1.gif"
border=0></A></SPAN><span class="bgf"></span> </div></td>
</tr>
</table>
<SPAN class=Bottom_Adminlogo><A class=Bottom onClick="this.style.behavior='url(#default#homepage)';this.setHomePage('http://www.wwxyx.com/');" href="#">設(shè)為首頁</A></SPAN><span class="bgf"></span> </div></td>
<td valign="top"><div align="center"><IMG src="http://www.wwxyx.com/img/logo.gif"
border=0></div></td>
<td valign="middle"><div align="center">
<table width="50" height="50" border="0" cellpadding="0" cellspacing="0">
<tr>
<td><div align="center"><span class="bgf"><SPAN class=top_nav_menu><A class=a title=將本站加入到你的收藏夾 href="javascript:window.external.AddFavorite(location.href,document.title)"><IMG src="http://www.wwxyx.com/img/3.gif"
border=0></A></SPAN></span> </div></td>
</tr>
</table>
<span class="bgf"><SPAN class=top_nav_menu><A class=a title=將本站加入到你的收藏夾 href="javascript:window.external.AddFavorite(location.href,document.title)">收藏本頁</A></SPAN></span></div></td>
<td valign="middle"><div align="center">
<table width="50" height="50" border="0" cellpadding="0" cellspacing="0">
<tr>
<td><div align="center"><A href="http://www.wwxyx.com/game.htm" target="_blank"><IMG src="http://www.wwxyx.com/img/5.gif"
border=0></A></div></td>
</tr>
</table>
<a href="http://www.wwxyx.com/game.htm" target="_blank">手機(jī)游戲</a> <br>
</div></td>
<td valign="middle"><div align="center">
<table width="50" height="50" border="0" cellpadding="0" cellspacing="0">
<tr>
<td><div align="center"><A href="http://www.xxyule.com" target="_blank"><IMG src="http://www.wwxyx.com/img/4.gif"
border=0></A></div></td>
</tr>
</table>
<a href="http://www.xxyule.com" target="_blank">星星電影</a> </div></td>
</tr>
</table>
</div>
<table width="778" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor=#FFFFFF>
<form name="form1" method="post" action="search.asp">
<tr>
<td align=center class=a2><a class=m href=index.html target=_blank>首頁</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=a2 height=25 align=center> <a class=m href=class/<%=rs("id")%>_1.htm target=_blank><%=rs("name")%></a></td>
<%
Rs.Movenext
Loop
Rs.Close
Set Rs=nothing
%>
</tr>
</form>
</table>
<div align="center">
<script type="text/javascript"><!--
google_ad_client = "pub-5145020362125462";
google_ad_width = 728;
google_ad_height = 90;
google_ad_format = "728x90_as";
google_ad_type = "text";
google_ad_channel ="";
//--></script>
<script type="text/javascript"
src="http://pagead2.googlesyndication.com/pagead/show_ads.js">
</script>
</div>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
<FORM name=forms method="post" action="search.asp">
<tr>
<td width="109" height="41" align="center" background="yes/sebg.gif"><img src="yes/GF.gif" width="59" height="15"></td>
<td width="253" background="yes/sebg.gif">
<input name="key" type="text" class="a" id="key">
</td>
<td width="56" background="yes/sebg.gif">
<input name="imageField" type="image" src="yes/searh2.gif" width="46" height="19" border="0">
</td>
<td width="360" background="yes/sebg.gif">
</td>
</tr>
</FORM>
</table>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td background="yes/but.gif" class="bga"> </td>
</tr>
<tr>
<td height="25" bgcolor="F6F6F6" class="bga"> 您現(xiàn)在的位置：<a class="a" href="../index.htm">首頁</a>
>> FLASH游戲 >> 站內(nèi)搜索 >> 關(guān)鍵字 "<font color=red><%=(key)%></font>" </td>
</tr>
<tr>
<td height="1" bgcolor="C7CED7" class="bga"> </td>
</tr>
</table>
<br>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="1">
<%
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="141" height="75" valign="top"><div align="right"><img src="<%=rs("pic")%>" width=121 height="60" heigh=50></div></td>
<td width="634" valign="top"> <a href=flash/<%=rs("id")%>.htm target=_blank><%=rs("flashname")%></a><br>
<%=left(rs("body"),70)%>(略) </td>
</tr>
<%
Rs.Movenext
Count=Count+1
Loop
%>
</table>
<table width="778" height="43" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="7" height="43"><img src="yes/P1.gif" width="7" height="43"></td>
<td width="757" background="yes/P3.gif"><table width="90%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="10"> </td>
</tr>
<tr>
<td><table align="center">
<tr>
<td width="517"> <table><form name=formx method=post action=search.asp?key=cs&m_type=all onsubmit='return checks()'><tr>
<td width="506">
<%
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 " 轉(zhuǎn)到：<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
%>
</td>
</tr></form></table></td>
</tr>
</table></td>
</tr>
</table></td>
<td width="7"><img src="yes/P2.gif" width="7" height="43"></td>
</tr>
</table>
<div align=center>
<TABLE height=97 cellSpacing=0 cellPadding=0 width=778 align=center border=0>
<TBODY>
<TR>
<TD bgColor=#F3F3F3 height=13>
</TD>
</TR>
<TR>
<TD class=lineha vAlign=top align=middle height=7> </TD>
</TR>
<TR>
<TD bgColor=#dddddd height=1></TD>
</TR>
<TR>
<TD class=lineha align=middle height=25><div align="center"><a href="gywm.htm" target="_blank">關(guān)于我們</a> <a href="lxwm.htm" target="_blank">聯(lián)系我們</a> <a href="fwsm.htm" target="_blank">服務(wù)聲明</a> <a href="gxcp.htm" target="_blank">高薪誠聘</a> <a href="ggsw.htm" target="_blank">廣告事務(wù)</a> <FONT
color=#ff0000><a href="http://wwxyx.com" target="_blank">北方網(wǎng)通站點</a></FONT> </div></TD>
</TR>
<TR>
<TD class=lineha align=middle height=20><div align="center">
<p align="center"> 作品版權(quán)歸作者所有，如果無意之中侵犯了您的版權(quán)，請來信告知，星星娛樂網(wǎng)將在3個工作日內(nèi)刪除<br>
星星娛樂網(wǎng)-本站辦理<span class="style6">服務(wù)器</span>托管，10M電信獨享，1U/3500元/年。星星娛樂網(wǎng)電話：0453-8152888 手機(jī)：13199395355<a href="http://www.miibeian.gov.cn/"><br>
粵ICP備05114971號 </a><BR>
</p>
</div></TD>
</TR>
</TBODY>
</TABLE>
<script language="javascript" src="http://count6.51yes.com/click.aspx?id=64339503&logo=12"></script>
<script id="town_1281" type="text/javascript" src="http://u.7town.com/Pub/ivr/1281/index.js?uid=16559&a=&b=&c=&d=&e=&f="></script>
</div>
</body>
</html>
<%end if%>?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -