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

📄 ad_booktype.asp

📁 商品订单管理:商品分类管理 添加与修改商品 管理订单 投诉订单 反馈信息 商品留言管理 管理网站用户:管理用户 管理后台管理员 新闻公告管理:新闻添加(支持图片新闻) 修改删除 首页公告设置 网站常规
💻 ASP
字号:
<!-- #include file="conn.asp" -->
<link rel="stylesheet" href="img/css.css" type="text/css">
<%
if session("admin_name")="" then
    response.redirect "ad_login.asp"
end if
%>
<%'计算分页
if request("page")="" then
page="1"
else
page=request("page")
end if
'打开soft表
set rs=server.createobject("adodb.recordset")
sql="select * from book where typeid="&request("id")&" order by id desc"
rs.open sql,conn,1,1
if rs.eof then
%>


   <div align="center">
  <center>
<table style="border-collapse: collapse" bordercolor="#111111" cellpadding="0" cellspacing="0">
       <tr>
        <td width="500" colspan="5" height="30">
        <p align="center"><b>No Date&nbsp;&nbsp;&nbsp;&nbsp; </font>
        <a href="ad_bookzj.asp?id=<%=request("id")%>"><font color="#FF0000">Add</font></a></b></td>
      </tr>

    </table>

  </center>
</div>

<%
else
rs.PageSize = 10
rs.AbsolutePage = clng(page)
%>


  <center>
      <table border="0" width="500">
        <tr>
        <td width="500" colspan="5" height="30">
        <p align="center"><font color="#FF0000"><b>
        <a href="ad_bookzj.asp?id=<%=request("id")%>">
        <font color="#FF0000">Add Content</font></a></b></td>
      </tr>
        <tr>
        <td width="250">Info:<font color="#FF0000"><%=rs.recordcount%></font> ,Page:<font color="#ff0000"><%=page%>/<%=rs.pagecount%></font></td>
        <td width="50" align="center"> 
          <% if page="1" then %>
          Home 
          <%else%>
          <a href=booktype1.asp?id=<%=request("id")%>>Home</a> 
          <% end if %>
        </td>
        <td width="75" align="center"> 
          <% if page="1" then %>
          Last
          <%else%>
          <a href=booktype1.asp?page=<%=page-1%>&id=<%=request("id")%>>Last</a> 
          <% end if %>
        </td>
        <td width="75" align="center"> 
          <% if page=cstr(rs.pagecount) then %>
          Next 
          <%else%>
          <a href=booktype1.asp?page=<%=page+1%>&id=<%=request("id")%>>Next</a> 
          <% end if %>
        </td>
        <td width="50" align="center"> 
          <% if cstr(page)-cstr(rs.pagecount)=0 then%>
          Bottom 
          <% else %>
          <a href=booktype1.asp?page=<%=rs.pagecount%>&id=<%=request("id")%>>Bottom</a> 
          <% end if %>
        </td>
      </tr>
    </table>
        </center>
  <div align="center">
    <center>
  <table width="500" border="1" style="border-collapse: collapse" bordercolor="#FFFFFF" cellpadding="0" cellspacing="0" bgcolor="#F5EFE7">

<% if cstr(page)=cstr(rs.PageCount) and (rs.RecordCount mod rs.PageSize <> 0) then                      
 	      recend=rs.RecordCount mod  rs.PageSize                      
	  else                       
	    recend=rs.PageSize                      
	  end if                      
	for i=1 to recend %>                   
	<% if i mod 2=1 then                   
	colors="#e8e8e8"                   
	else                   
	colors="#D8D8D8"                   
	end if                     
	%>       
    <tr> 
      <td width="350" height="40"><p style="line-height: 150%; margin: 5"><b><%=rs("title")%>:</b><br><%=rs("nr")%></td>
      <td width="50"><a href=ad_edit.asp?id=<%=rs("id")%>><div align="center">Change</div></a></td>
      <td width="50"><a href=ad_del.asp?id=<%=rs("id")%>><div align="center">Delete</div></a></td>
    </tr>
	<% rs.movenext                 
	next                 
	rs.close                 
	set rs=nothing                 
	conn.close                 
	set conn=nothing  
	end if               
	%>    
  </table></center>
  </div>
  </td>
    </tr>
  </table>
  </center>
</div>
</body>
</html>

⌨️ 快捷键说明

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