📄 search.asp
字号:
<!--#include file="Inc/syscode.asp"-->
<%
const ChannelID=2
const ShowRunTime="Yes"
MaxPerPage=10
SkinID=0
PageTitle="搜索结果"
strFileName="Search.asp?Field=" & strField & "&Keyword=" & keyword & "&ClassID=" & ClassID
%>
<html>
<head>
<title><%=SiteName%>--文章搜索结果</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<!--#include file="inc/Skin_CSS.asp"-->
<% call MenuJS() %>
</head>
<body <%=Body_Label%> onmousemove='HideMenu()'>
<!--#include file="Top.asp"--> <table width="760" border="0" align="center" cellpadding="0" cellspacing="0" class="border2">
<tr> <td width="180" align="left" valign="top" class="tdbg_leftall"> <TABLE cellSpacing=0 cellPadding=0 width="100%" border="0">
<TR class="title_left"> <TD align="center"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr> <td class="title_lefttxt"><IMG SRC="images/10.gif"></td></tr> </table></TD></TR>
<TR> <TD height="80" valign="top" class="tdbg_left"> <table width="100%" height="100%" border="0" cellpadding="0" cellspacing="5">
<tr> <td valign="top" bgcolor="#FFFFFF"> <% call ShowSpecial(10) %> </td></tr> </table></TD></TR>
</table><TABLE cellSpacing=0 cellPadding=0 width="100%" border="0"> <TR class="title_left">
<TD align="center"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr> <td class="title_lefttxt"><IMG SRC="images/9.gif"></td></tr> </table></TD></TR>
<TR> <TD height="80" valign="top" class="tdbg_left"> <table width="100%" height="100%" border="0" cellpadding="0" cellspacing="5">
<tr> <td valign="top" bgcolor="#FFFFFF"> <% call ShowHot(5,16) %> </td></tr> </table></TD></TR>
</table><TABLE cellSpacing=0 cellPadding=0 width="100%" border="0"> <TR class="title_left">
<TD align="center"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr> <td class="title_lefttxt"><IMG SRC="images/8.gif"></td></tr> </table></TD></TR>
<TR> <TD height="80" valign="top" class="tdbg_left"> <table width="100%" height="100%" border="0" cellpadding="0" cellspacing="5">
<tr> <td valign="top" bgcolor="#FFFFFF"> <% call ShowElite(5,16) %> </td></tr> </table></TD></TR>
</table><TABLE cellSpacing=0 cellPadding=0 width="100%" border="0"> <TR class="title_left">
<TD align="center"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr> <td class="title_lefttxt"><IMG SRC="images/7.gif"></td></tr>
</table></TD></TR> <TR> <TD height="80" valign="top" class="tdbg_left"> <table width="100%" height="100%" border="0" cellpadding="0" cellspacing="5">
<tr> <td valign="top" bgcolor="#FFFFFF"> <% call ShowVote() %> </td></tr> </table></TD></TR> </table><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr> <td class="tdbg_left"><table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr> <td height="11" Class="title_left2"></td></tr> </table></td></tr> </table></td><td width="5"></td><td width="575" valign="top">
<table width="100%" border="0" cellpadding="0" cellspacing="0" class="title_main">
<tr> <td width="40"> </td><td><table width="100%" border="0" cellspacing="0" cellpadding="0" >
<tr> <td class="title_maintxt"><%
if keyword="" then
response.write "所有文章"
else
select case strField
case "Title"
response.write "标题中含有 <font color=red>"&keyword&"</font> 的文章"
case "Content"
response.write "内容含有 <font color=red>"&keyword&"</font> 的文章"
case "Author"
response.write "作者姓名含有 <font color=red>"&keyword&"</font> 的文章"
case else
response.write "标题中含有 <font color=red>"&keyword&"</font> 的文章"
end select
end if
%> </td></tr> </table></td></tr> </table><table width="100%" border="0" cellspacing="0" cellpadding="0" class="border">
<tr> <td valign="top"> <table width="100%" height="100%" border="0" cellpadding="0" cellspacing="5">
<tr> <td valign="top"> <%call ShowSearchResult()%> </td></tr> </table></td></tr>
<tr class="tdbg"> <td> <table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr class="tdbg_leftall"> <td> <%
if totalput>0 then
call showpage(strFileName,totalput,MaxPerPage,false,true,"篇文章")
end if
%> </td></tr> </table></td></tr> </table><table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr> <td height="15" align="center" valign="top"> <table width="98%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr> <td height="13" Class="tdbg_left2"></td></tr> </table></td></tr> </table><table width='100%' border='0'cellpadding='2' cellspacing='0'>
<tr class='tdbg_leftall'> <td width="18%"> <div align="center"> <table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr> <td class="title_maintxt"><div align="center">文章搜索</div></td></tr> </table></div></td><td width="82%">
<% call ShowSearchForm("Search.asp",2) %> </td></tr> </table></td></tr> </table><table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
<tr> <td height="13" align="center" valign="top"><table width="755" border="0" align="center" cellpadding="0" cellspacing="0">
<tr> <td height="13" Class="tdbg_left2"></td></tr> </table></td></tr> </table><% call Bottom() %>
</body>
</html>
<% call CloseConn() %>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -