ASP分段读取数据库代码

作者:gnbbs 来源:经典论坛 时间:2009-10-12 12:28:00 

ASP如何分两段读取数据库?中间插入广告。代码如下:

<!--#include file="conn.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>aspxhome.com</title>
<meta name="keywords" content="" />
<meta name="description" content="" />
<link href="" rel="stylesheet" type="text/css" />
<style type="text/css">
<!--
#web {margin-left:auto; margin-right:auto; width:600px; height:auto; text-align:left; margin:0 auto}
.A {float:left; width:100%; height:auto; border:1px solid #CCC; background:#F8F8F8;}
.A ul {float:left; list-style-type:none;}
.A li {margin-top:8px; margin-bottom:8px;}
.B {float:left; width:100%; height:100px;}
-->
</style>
</head>
<body>
<div id="web">
<div class="A">
<ul>
<%
i=0
set rs=server.createobject("adodb.recordset") 
sql ="select * from 表 order by 日期 Desc"
rs.open sql,conn,1,1
if rs.eof then
%>
没有文章
<%
else
do while not rs.eof
%>
<li><a href="<%=rs("路径")%>" target="_blank"><%=rs("标题")%></a></li>
<%
i=i+1
if i>=8 then exit do     '显示条数
rs.movenext
loop
end if
rs.close
%>
</ul>
</div>
<!--广告-->
<div class="B"><br/>广告位置</div>
<div class="A">
<ul>
<%
i=0
set rs=server.createobject("adodb.recordset") 
sql ="select * from 表 where 自动排列字段 not in (select top 10 自动排列字段 from 表 order by 日期 Desc) order by 日期 Desc"
rs.open sql,conn,1,1
if rs.eof then
%>
没有文章
<%
else
do while not rs.eof
%>
<li><a href="<%=rs("路径")%>" target="_blank"><%=rs("标题")%></a></li>
<%
i=i+1
if i>=8 then exit do     '显示条数
rs.movenext
loop
end if
rs.close
%>
</ul>
</div>
</div>
</body>
</html>

标签:数据库,asp,sql
0
投稿

猜你喜欢

  • ASP动态生成的javascript表单验证代码

    2008-10-13 20:11:00
  • PHP原型模式Prototype Pattern的使用介绍

    2023-05-25 01:21:04
  • UTF-8转为GB2312编码的asp函数

    2007-08-23 13:42:00
  • SQL Server 2005如何设置多字段做关键字

    2009-01-08 15:57:00
  • 讲解SQL Server数据库触发器的安全隐患

    2009-02-24 17:46:00
  • 操作Dom节点实现间歇滚动新闻

    2009-10-16 20:51:00
  • 使用 XML 文件记录操作日志

    2008-09-05 17:13:00
  • 重新认识CSS的权重

    2011-05-24 17:06:00
  • JavaScript程序执行顺序问题总结

    2010-01-29 13:06:00
  • MySQL Order By索引优化

    2011-01-04 19:56:00
  • CSS清除浮动常用方法小结

    2009-07-07 11:59:00
  • CSS Sprites

    2007-10-10 13:21:00
  • 如何将服务器端变量转换为客户端的变量?

    2009-12-03 19:54:00
  • CSS实现完美垂直居中

    2007-09-22 09:29:00
  • Web2.0视觉风格进化论 之一

    2007-11-03 19:58:00
  • Oracle常用命令大全集

    2010-07-21 13:18:00
  • 最令人蛋疼的10种用户体验设计师

    2011-08-05 18:51:07
  • JavaScript 实现 Konami Code

    2009-05-26 12:44:00
  • css学习笔记:安全字体

    2009-03-10 18:34:00
  • phpstudy apache开启ssi使用详解

    2023-05-25 08:04:44
  • asp之家 网络编程 m.aspxhome.com