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

📄 search_jg.asp

📁 类似于baidu的百度知道
💻 ASP
字号:
<!--#include file=conn.asp-->
<!--#include file="Config.asp"-->
<%
if gx=1 then
if request("content")="" then
	  response.write"<script>alert('搜索关键字不能为空!');history.back();</script>"
	  else%>
<html>
<head>
<title><%=webname%>搜索_<%=HTMLcode(request("content"))%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<!--#include file=top.asp-->

<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td height="25"><a href="<%=weburl%>"><%=webname%></a> &gt; 搜索结果</td>         
  </tr>
</table>
<%
content=HTMLcode(request("content"))
rs.open"select * from Share where ftitle like '%"&content&"%' or text like '%"&content&"%'",conn,1,1
maxnum=rs.recordcount
if rs.eof then%>
<table border="0" width="100%" cellspacing="0" cellpadding="0" class="t1">
	<tr>
<td>
<table border="0" width="100%" cellspacing="0" cellpadding="0" height="100%">
	<tr>
		<td height="36" align="center" onmouseover="this.className='tbb'" onmouseout="this.className='taa'" class="taa"><strong>管理员修改密码</strong></td>
	</tr>
	<tr>
		<td align=center><br>
<table border="0" width="98%" cellspacing="0" cellpadding="0">
	<tr>
<td>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" >
  <tr> 
    <td height="24" class="t11" colspan=2><div align="right">共搜到相关问题 0 项</div></td>  
  </tr>
<TR align="left" valign="middle">
    <TD height=37 colspan="2"><br>
      <P ><font color="#FF0000">★未找到和您的查询相匹配的共享资料。</font></P>
		 您还可以:
<div>
	     <LI> 查看输入的文字是否有误; </li>
        <LI>去掉可能不必要的字词,如"的"、"什么"等;</li>
        <LI>请看<a href="Help.asp">问吧帮助</a>;</LI>
		</div>	    
        <p>         
</P>
</TD>
  </TR>
</table>
<%else%>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" >
  <tr> 
    <td height="24" class="t11"><div align="right"">共搜到相关问题 <%=maxnum%> 项</div></td>       
  </tr>
</table>
<div id="mainDiv"> 
<div>
<%
		rs.pagesize=10
		maxpage=rs.pagecount
		if request("p")="" then
		p=1
		else
		p=cint(request("p"))
		end if
		if p>maxpage then
		p=maxpage
		end if
		if p=0 then
		p=1
		end if
		if p<>1 then
		rs.move (p-1)*rs.pagesize
		end if
		for i=1 to rs.pagesize
		rs1.open"select * from assort where id="&rs("flid"),conn,1,1
topic=rs1("topic")
rs1.close
		%>
<p class="pC"><span class="ResultTit"> <a href="Share_View.asp?id=<%=rs("id")%>" target=_blank><%=HTMLcode(rs("ftitle"))%></a></span>    
<br><%=left(HTMLcode(rs("text")),150)&"..."%><br> 
<font class="fs">
<a href="Show_User.asp?name=<%=rs("upuser")%>" class="lkgn" target=_blank><%=rs("upuser")%></a> - <span class="f12gn"><%=rs("uptime")%></span> - <a href="List_Share.asp?id=<%=rs("flid")%>" class="lklbe"><%=topic%></a></font></p>      
<%rs.movenext
		if rs.eof then exit for
		next%></div></div><br>
<table width="100%" height="24" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr class="t11"> 
    <td class="bgpagLn" align="center">共<font color=red><%=maxnum%></font>个相关问题,10个每页,分<font color=red><%=maxpage%></font>页,当前页<font color=red><%=p%></font>
		<a href=Search_JG.asp?submit=站内搜索&content=<%=content%>&p=1>首页</a> 
		<a href=Search_JG.asp?submit=站内搜索&content=<%=content%>&p=<%=p-1%>>上页</a> 
		<a href=Search_JG.asp?submit=站内搜索&content=<%=content%>&p=<%=p+1%>>下页</a> 
		<a href=Search_JG.asp?submit=站内搜索&content=<%=content%>&p=<%=maxpage%>>尾页</a> 
</td> 
  </tr>
</table>
<br>
<br>
<table width="770" border="0" align="center" cellpadding="0" cellspacing="0" style="clear:both;">
  <tr> 
    <td class="bgdsrh" align="center">
      <table  border="0" cellspacing="0" cellpadding="0" height="55">
       <tr>
        <form name=fbop method=post action=Search_JG.asp>
          <td height="26"><input name="content" type="text" id="content" value="" size="47" class="ip22">
            &nbsp;<input type="submit" name="Submit" value="搜索资料" class="ip2"></td> 
        </tr>
       </form>
      </table></td>
  </tr>
</table>
<br>
</td>
	</tr>
</table>
<%
end if
end if
rs.close
%><!--#include file=end.asp--><%
else
Response.Write ("<script>alert('对不起,共享资料功能未启用!');history.back();</script>")
		Response.end
	end if
%>

⌨️ 快捷键说明

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