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

📄 show_search.asp

📁 功能最强大的ASP网站
💻 ASP
字号:
<!--#include file="conn.asp" -->
<!--#include file="setting.asp"-->
<%
  classname=request("classname")
  newsname=request("newsname")
  if classname="新闻分类" then
  response.Write("新闻分类不能为空")
  response.Redirect("search.asp")
  end if
  if request("action")="high" then
  set rs=server.createobject("adodb.recordset")
  sql="select * from NEWS where title='"&classname&"' order by bh desc"
  rs.open sql,conn,1,1
  if rs.eof and rs.bof then
  response.Write("没有搜索的结果!错误原因可能为:你没添加任何新闻,或者新闻标题不存在!")
  end if
  else
  		set rs=server.createobject("adodb.recordset")
        sql="select * from NEWS where bigclassname='"&classname&"' order by bh desc"
        rs.open sql,conn,1,1
		end if
		if rs.eof and rs.bof then
		response.Write("没有搜索的结果!错误原因可能为:你没添加任何分类,或者分类名称不存在!")
		response.Redirect("search.asp")
		else
		%>
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>show</title>
<link href="css/css.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
body {
	background-image: url();
}
-->
</style></head>

<body>
<div align="center">
<table width="861" border="0" class="STYLE3">
  <tr>
    <td width="207" height="27" background="image/item_bg.gif" class="STYLE13" id="new" style="border:#999999 1px solid">使用技巧提示:</td>
  </tr>
  <tr>
    <td style="border:#999999 1px solid">点击新闻直接查看新闻相关信息,点删除直接删除或修改!</td>
  </tr>
</table>

</div><br>
<%for i=1 to 100%>
<div>
  <div align="center" class="STYLE3">
    <table width="861" border="0" bgcolor="#FFFFFF" class="tb1">
      <tr>
        <td>
          
		  <div align="left">
		    <a href="files/<%=rs("bh")%>.html" target="_blank">
		    <%
		response.Write(rs("title")&"<br>")
		
		%>
            </a> </div></td>
        <td><div align="right"><a href="admin_del.asp?bh=<%=rs("bh")%>">删除</a> <a href="admin_modi.asp?bh=<%=rs("bh")%>">修改</a></div></td>
      </tr>
    </table>
  </div>
</div>
</body>
    <%
		rs.movenext
        if rs.eof then exit for
        next
		end if
  %>
</html>

⌨️ 快捷键说明

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