📄 news.asp

📁 短信销售类网站
💻 ASP
字号:
<!--#include file="Inc/conn.asp"-->
<!--#include file="Inc/config.asp" -->


<% 
owen1=request("owen1")
owen2=request("owen2")
%>

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<!-- saved from url=(0035)http://www.antsms.cn/news.asp?tid=2 -->
<HTML><HEAD><TITLE>纯真文化</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312"><!--<body></body>-->
<META content=all name=robots>
<META content=北京纯真文化 name=keywords>
<META content=网站描述 name=description><LINK href="images/css.css" 
type=text/css rel=stylesheet><LINK href="images/page_ccc.css" type=text/css 
rel=stylesheet>
<META content="MSHTML 6.00.2900.2873" name=GENERATOR></HEAD>
<BODY>
<!--#include file="top.asp"-->
<TABLE cellSpacing=0 cellPadding=0 width=997 align=center border=0>
  <TBODY>
  <TR>
    <TD vAlign=top align=left width=334 bgColor=#ffffff>
	
	<!--#include file="left_ywzx.asp"-->
	
	
	</TD>
    <TD vAlign=top align=left width=663>
      <TABLE cellSpacing=0 cellPadding=0 width=651 border=0>
        <TBODY>
        <TR>
          <TD vAlign=top align=left 
          background=images/chunzhenxinlibiao-3_19.jpg height=500>
            <TABLE cellSpacing=0 cellPadding=0 width=625 align=center 
              border=0><TBODY>
              <TR>
                <TD class=zihei vAlign=center align=left height=30>&nbsp;&nbsp;<a href="index.asp"> 您的位置</a> &gt;<a  href="news.asp?owen1=<%=owen1%>"><%=owen1%></a></TD>
              </TR>
              <TR>
                <TD vAlign=top align=left width=625 
                background=images/chunzhenxinlibiao-3_09.jpg height=34>
                  <TABLE height=35 cellSpacing=0 cellPadding=0 width=278 
                  border=0>
                    <TBODY>
                    <TR>
                      <TD width=59 height=35>&nbsp;</TD>
                      <TD class=dazi vAlign=center align=left 
                    width=219><%=owen1%></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
					
					
					<table Class=border width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
              <tr> 
                <td height="206" valign="top"> <table width="100%" border="0" cellspacing="0" cellpadding="0">
                    
                  </table>
                  <table width="100%" border="0" cellpadding="0" cellspacing="0">
                    <% 
page=clng(request("page"))		 
Set rs=Server.CreateObject("ADODB.RecordSet") 
if owen1<>"" and owen2 <>"" then
sql="select * from news where BigClassName='"&owen1&"' and SmallClassName='"&owen2&"' order by infotime desc "
rs.Open sql,conn,1,1
elseif owen1<>"" then
sql="select * from news where BigClassName='"&owen1&"' order by infotime desc"
rs.Open sql,conn,1,1
end if
if rs.eof and rs.bof then
  response.Write("暂时没有记录")
else 
%>
                    <% 
rs.PageSize=20
if page=0 then page=1 
pages=rs.pagecount
if page > pages then page=pages
rs.AbsolutePage=page  
for j=1 to rs.PageSize 
%>
                    <tr> 
                      <td width="6%" height="24" align="center" >  </td>
                      <td width="6%" align="center" >◎</td>
                      <td width="88%" height="24" style="BORDER-bottom: #999999 1px dotted"> 
                        <% if rs("imagenum")<>"0" then response.write "<img src='images/news.gif' border=0 alt='图片新闻'>" end if %> <a href="shownews.asp?id=<%= RS("id") %>" target="_blank"><%= RS("TITLE") %></a>　<font color="#999999">[<%= RS("infotime") %>] (阅读<font color="#ff0000"><%= RS("hits") %></font>次) </font></td>
                    </tr>
                    <%
rs.movenext
if rs.eof then exit for
next
%>
                    <tr valign="bottom"> 
                      <td height="50" colspan="3" align="center" > <form method=Post action="news.asp?owen1=<%=owen1%>&owen2=<%=owen2%>">
                          <%if Page<2 then      
    response.write "首页 上一页&nbsp;"
  else
    response.write "<a href=news.asp?owen1="&owen1&"&owen2="&owen2&"&page=1>首页</a>&nbsp;"
    response.write "<a href=news.asp?owen1="&owen1&"&owen2="&owen2&"&page=" & Page-1 & ">上一页</a>&nbsp;"
  end if
  if rs.pagecount-page<1 then
    response.write "下一页 尾页"
  else
    response.write "<a href=news.asp?owen1="&owen1&"&owen2="&owen2&"&page=" & (page+1) & ">"
    response.write "下一页</a> <a href=news.asp?owen1="&owen1&"&owen2="&owen2&"&owen2="&owen2&"&page="&rs.pagecount&">尾页</a>"
  end if
   response.write "&nbsp;页次：<strong><font color=red>"&Page&"</font>/"&rs.pagecount&"</strong>页 "
    response.write "&nbsp;共<b><font color='#FF0000'>"&rs.recordcount&"</font></b>条记录 <b>"&rs.pagesize&"</b>条记录/页"
   response.write " 转到：<input type='text' name='page' size=4 maxlength=10 class=input value="&page&">"
   response.write " <input class=input type='submit'  value=' Goto '  name='cndok'></span></p>"     
%>
                        </form></td>
                    </tr>
                    <% 
end if
rs.close
set rs=nothing
%>
                  </table> </td>
              </tr>
            </table>
					
					
					
					
					
            </TD>
        </TR></TBODY></TABLE>
      <TABLE cellSpacing=0 cellPadding=0 width=651 border=0>
        <TBODY>
        <TR>
          <TD vAlign=top align=left><IMG height=24 alt="" 
            src="images/chunzhenxinlibiao-3_23.jpg" 
      width=651></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<!--#include file="bottom.asp"--></BODY></HTML>
⌨️ 快捷键说明

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