newsall.asp

来自「百堂数字点卡程序v1.0后台路径:http://域名/admin 管理帐号和密码」· ASP 代码 · 共 69 行

ASP
69
字号
<!--#include file="top.asp"-->
<td width="15" height="3">&nbsp;</td>
<!--#include file="lest.asp"--></td>
  <td width="15" height="30">&nbsp;</td>
			<td valign="top">
			<table border="0" width="450" cellspacing="0" cellpadding="5" bgcolor="#FFFFFF">
<tr> 
<form method="POST" action="newsall.asp">
<td align="center" width="322">
<p align="left">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 查询商城动态:<input type="text" name="keyword" size="20" class=ipt> <br></td>
<td align="center" width="108">
<input type="image" border="0" name="b12" src="images/searchme.gif" width="75" height="25"></td></form></tr>
<%
  keyword=srequest(trim(request("keyword")),0)  
  sql="select * from news where news_title like '%"&keyword&"%' order by news_id desc"
  rs.open sql,conn,3,3
  if rs.eof then
      response.write "暂且没有相关商城动态资料"
      response.end
  end if
      rs.pagesize=15
      page = cint(request("page"))
      if page = "" then page = 1
      if not(isnumeric(page)) then page=1
      if page<1 then page=1
      if page >= rs.pagecount then page = rs.pagecount
      rs.absolutepage = page
  %>
<%
for i=1 to rs.pagesize
%>
  
    <td width="440" colspan="2"> 
    <p align="left">
	&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
	<img border="0" src="images/bottom1.jpg" width="5" height="7"> <a href="newsweb.asp?idd=<%=rs("news_id")%>" target="_blank"><%=rs("news_title")%></a><font color=000000>&nbsp;&nbsp;&nbsp;&nbsp; 
	</font><font color=#808080>[<%=rs("news_date")%>]</td>         
  
  </tr>
  <tr>
    <td width="440" colspan="2"></td>
  </tr>
<%
rs.movenext
if rs.eof then exit for
next
%>
<tr>         
<td align="right" colspan="2">        
                    <p align="center">共有记录<%=rs.recordcount%>条&nbsp;                   
                    <%=page%>/<%=rs.pagecount%>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <A href="<%request.servervariables("document_name")%>?page=<%=page-1%>&keyword=<%=keyword%>">上一页</A> <A href="<%request.servervariables("document_name")%>?page=<%=page+1%>&keyword=<%=keyword%>">下一页</A>&nbsp;&nbsp;&nbsp; 转到第 <SELECT onchange="window.location='?keyword=<%=keyword%>&page='+this.value" name=gopage>              
                    <%for x=1 to rs.pagecount%>
                    <OPTION <%if x=page then%>selected<%end if%> value=<%=x%>><%=x%></OPTION>
                    <%next%>      
                    </SELECT> 页        
                    </div>
                    <%rs.close%>
          </td>     
</tr>  
</table>
 </td>
			<td width="167" valign="top">
			<p align="center">
			<img border="0" src="images/E1148.gif" width="167" height="359"></td>
		<td width="1"  background="images/line.jpg"></td>
		</tr>
	</table>
<!--#include file="copy.asp"-->

⌨️ 快捷键说明

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