⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 search.asp

📁 if you want it,call me.
💻 ASP
字号:
🔍 
<!--#include file="conn.asp"-->
<!--#include file="UBBencode.ini"-->
<!--#include file="textencode.ini"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<%
	strSql="Select blogTitle From config"
	Set rs=db.Execute(strSql)	
%>
<title><%response.Write rs("blogTitle")%></title>
<%
	rs.close
	set rs=nothing
	%>
<style type="text/css">
a.index:hover{
color:#333333;
text-decoration:none;
}
a.index:link{
color:#666666;
text-decoration:underline;
}
a.index:visited{
color:#333333;
text-decoration:none;
}		
</style>
<script language="javascript" type="text/javascript">
	function check1()
	{
			if (document.form1.keyword.value=="")
			{ 
				alert("请输入关键字!");			
				}		
	 		return false;	
		}				
</script>
<link href="blog.css" rel="stylesheet" type="text/css" />
</head>
<body>
<%
	dim page_no
	'page_no=request.QueryString("page_no"))
	if request.QueryString("page_no")="" then
		page_no=1
	else	
		page_no=cint(request.QueryString("page_no"))
	end if
%>
	<div id="all">
	<table border="1" bgcolor="#999999" width="100%" height="100%">
	<tr>
		<td bgcolor="#E7E7E7">
		<!--#include file="top.asp"-->
		<div id="left-bg">
			<div id="body-top"><a href="index.asp" class="index">首页</a>-->搜索结果</div>
			<div id="left-title">搜索关键字。包含在以下的主题里</div>
			<div id="left-body-content">
				<%
					dim keyword,flag
					flag=1
					keyword=request.form("keyword")
					'if keyword="" then
						'response.write "<script>alert('师兄不能为空哦！');history.back();</dscript>"
					'else
					'dim rs,strsql
					set rs=server.createobject("adodb.recordset")
					strsql="select * from article where body like '%"&keyword&"%' or title like '%"&keyword&"%'order by subdate desc"
					rs.open strsql,db,1		
					if not rs.eof and not rs.bof then
					rs.pagesize=20
					dim page_total
					page_total=rs.pagecount
					articleRs.absolutepage=page_no
					dim i
					i=20		
				%>
					<ul>
						<%
						do while not rs.eof and i>0
						i=i-1		
						flag=0					
						%>
						<li>
						<a href="show_article.asp?articleid=<%=rs("articleid")%>" target="_blank" class="index"><%=replace(rs("title"),keyword,"<font color='red'>"&keyword&"</font>")%></a>						</li>
						<%
						rs.movenext
						loop
						end if
						%>
					</ul>	
				<%
				if flag=1 then					
				%>	
				<font color="#FF0000">没得你要的结果</font>				
				<%end if
				'end if%>
			</div>				
		<div id="page">	
		<%
		dim numpre,numnext
			numpre=page_no-1
			numnext=page_no+1
			response.write "&nbsp;&nbsp;&nbsp;<a href='search.asp?page_no=1' class='page'>首页</a>"
			if numpre=0 then
				response.write "&nbsp;&nbsp;&nbsp;上一页"
			else
				response.write "&nbsp;&nbsp;&nbsp;<a href='search.asp?page_no="&numpre&"' class='page'>上一页</a>"
			end if
			if numnext>page_total then
				response.write "&nbsp;&nbsp;&nbsp;下一页"	
			else
				response.write "&nbsp;&nbsp;&nbsp;<a href='search.asp?page_no="&numnext&"' class='page'>下一页</a>"
			end if
			response.write "&nbsp;&nbsp;&nbsp;<a href='search.asp?page_no="&page_total&"' class='page'>尾页</a>"	
	%>
	  <%
	  response.write "&nbsp;&nbsp;&nbsp;现在是第&nbsp;<font color='red'>"&page_no&"</font>&nbsp;页,"
	 response.write "&nbsp;&nbsp;&nbsp;共有&nbsp;"&page_total&"&nbsp;页,"
	
	  %>
		</div>	
		</div>			
			<!--#include file="right.asp"-->
			
						<div id="bottom">文章可以任意转载，只要注明出处就行了！这里也有转载的一些精华!Copyright &copy;&nbsp;MSMAX All Rights Reserved<br />
			   QQ:<a href="qq.html" target="_blank">278274384</a> Email:<a href="mailto:wangjinbo589@gmail.com">wangjinbo589@gmail.com </a><br />
		  </div>
			</td>
			</tr>
			</table>
	</div>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -