otype.asp

简洁清爽的网站管理管理系统,基本功能都具备了

<!--#include file="Inc/conn.asp"-->
<!--#include file="Inc/config.asp" -->
<!--#include file="inc/Skin_css.asp"-->
<!-- #include file="Head.asp" -->
<div align="center">
  <% 
owen1=request("owen1")
owen2=request("owen2")
%>
  <table width="767" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
    <tr>
      <td class="tdbg_left" width="217" valign="top"><!--#include file="left_product.asp" -->
      </td>
      <td width="6"></td>
      <td  valign="top"><table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td height="206" valign="top">
              <table width="100%" height="5"  border="0" cellpadding="0" cellspacing="0">
                <tr>
                  <td></td>
                </tr>
              </table>
              <table width="556" border="0" cellpadding="0" cellspacing="0">
                <tr>
                  <td width="556" height="28" background="Images/xxbg.gif"><img src="Images/81235959_detai.gif" width="556" height="34"></td>
                </tr>
              </table>
              <table width="556"  border="0" cellspacing="0" cellpadding="0">
                <tr>
                  <td background="Images/81235959_dj_gbg.gif"><table width="540" border="0" align="center" 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 id desc"
rs.Open sql,conn,1,1
elseif owen1<>"" then
sql="select * from news where BigClassName='"&owen1&"' order by id 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 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="2" align="center" >
                        <form method=Post action="otype.asp?owen1=<%=owen1%>&owen2=<%=owen2%>">
                          <%if Page<2 then      
    response.write "首页 上一页&nbsp;"
  else
    response.write "<a href=otype.asp?owen1="&owen1&"&owen2="&owen2&"&page=1>首页</a>&nbsp;"
    response.write "<a href=otype.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=otype.asp?owen1="&owen1&"&owen2="&owen2&"&page=" & (page+1) & ">"
    response.write "下一页</a> <a href=otype.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>
                <tr>
                  <td valign="top"><img src="Images/81235959_dj_tb.gif" width="556" height="6"></td>
                </tr>
                <tr>
                  <td height="8">&nbsp;</td>
                </tr>
              </table></td>
          </tr>
      </table></td>
    </tr>
  </table>
  <!--#include file="Inc/foot.asp"-->
</div>
</body>