📄 search.asp
字号:
<%@ LANGUAGE = VBScript.Encode %>
<!--#include file="top.htm"-->
<style type="text/css">
<!--
td { font-family: "宋体"; font-size: 9pt}
body { font-family: "宋体"; font-size: 9pt}
select { font-family: "宋体"; font-size: 9pt}
A {text-decoration: none; color: #000000; font-family: "宋体"; font-size: 9pt}
A:hover {text-decoration: underline; color: #cc3366; font-family: "宋体"; font-size: 9pt}
-->
</style>
<%
dim conn
dim connstr
on error resume next
connstr="DBQ="+server.mappath("hainanweb.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
%>
<%search=request("search")
if search="" or instr(search,"&")>0 or instr(search,"=")>0 then
response.write "<br><center><font color=#cc3366>没有填写搜索内容！</font></center>"
response.end
end if
flag=request("flag")
if flag="" or flag=0 then
flag=0
sql="select * from zkpick where (picksite like '%"&search&"%' or pickname like '%"&search&"%')"
else
sql="select * from zkpick where (picksite like '%"&search&"%' or pickname like '%"&search&"%' or pickjink like '%"&search&"%')"
end if
Sql=Sql&" order by pickvote desc,pickid asc"
%>
<head>
<style type="text/css">
<!--
td { font-family: "宋体"; font-size: 9pt}
body { font-family: "宋体"; font-size: 9pt}
select { font-family: "宋体"; font-size: 9pt}
A {text-decoration: none; color: #000000; font-family: "宋体"; font-size: 9pt}
A:hover {text-decoration: underline; color: #cc3366; font-family: "宋体"; font-size: 9pt}
-->
</style>
<title>3鸟设社网站评测-网站搜索</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="STYLE.CSS">
<script language="javascript">
<!--
function validate(){
art="";
art2="";
if (document.login.search.value==""){
alert("没有填写搜索内容");
return false;
}
}
//-->
</script>
<style type="text/css">
</style>
</head>
<BODY aLink=#000000 leftMargin=0
topMargin=0 vLink=#660033 marginheight="0" marginwidth="0" bgcolor="#FFFFFF">
<table width="764" border="0" cellspacing="2" cellpadding="0" align="center" class="9p">
<tr>
<td width="164" valign="top" bgcolor="#EDB7D1">
<table width="100%" border="0" class="9p" cellpadding="0" cellspacing="0" align="center">
<tr>
<td bgcolor="#CC3366" height="22">
<div align="center"><font color="#FFFFFF">类 型 分 类</font></div>
</td>
</tr>
<tr>
<td>
<table width="90%" border="0" cellspacing="1" cellpadding="2" class="9p" align="center">
<tr>
<td>
<div align="left"><img src="image/j1.gif" width="9" height="10">
<a href="listtype.asp?type=1">电脑网络</a></div>
</td>
<td><img src="image/j1.gif" width="9" height="10"> <a href="listtype.asp?type=12">综合网站</a></td>
</tr>
<tr>
<td>
<div align="left"><img src="image/j1.gif" width="9" height="10">
<a href="listtype.asp?type=2">免费资源</a></div>
</td>
<td><img src="image/j1.gif" width="9" height="10"> <a href="listtype.asp?type=11">社会公益</a></td>
</tr>
<tr>
<td>
<div align="left"><img src="image/j1.gif" width="9" height="10">
<a href="listtype.asp?type=3">休闲娱乐</a></div>
</td>
<td><img src="image/j1.gif" width="9" height="10"> <a href="listtype.asp?type=10">科技咨讯</a></td>
</tr>
<tr>
<td>
<div align="left"><img src="image/j1.gif" width="9" height="10">
<a href="listtype.asp?type=4">文学艺术</a></div>
</td>
<td><img src="image/j1.gif" width="9" height="10"> <a href="listtype.asp?type=9">商贸金融</a></td>
</tr>
<tr>
<td>
<div align="left"><img src="image/j1.gif" width="9" height="10">
<a href="listtype.asp?type=5">游戏世界</a></div>
</td>
<td><img src="image/j1.gif" width="9" height="10"> <a href="listtype.asp?type=8">程序设计</a></td>
</tr>
<tr>
<td>
<div align="left"><img src="image/j1.gif" width="9" height="10">
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -