asp实现随机显示新闻
来源：
互联网
日期：2011-5-31
|
| |
|
|
| |
我们针对各种网店的需求，提供具有专业针对性的智能网店。集易用性和强大功能为一体，支持静态HTML生成和搜索优化、个性化模版定制、强大的网店管理系统和各种专业网店功能...点此申请
|
|
| |
|
|
| |
智能建站已经成为企业网站建设的主要方式，建立个性化企业网站是企业品牌形象的体现；具有强大灵活的网站功能、HTML生成、搜索引擎优化，现有简体、繁体、英文、日文等多国语言可选用。赶快申请，立即拥有个性化企业网站... |
|
| |
|
|
| |
三语易站是国内受众最广泛的傻瓜式自助建站系统。只要会打字就可以建站，支持简繁英三语，简繁自动转换；具有单页、文章、图文、下载等网站内容管理功能，自定义栏目内容设置，管理系统简单易用，适合企业个人自助创建和管理网站...点此申请
|
|
|
|
|
| Tc711Com提示：asp实现随机显示新闻 .非常经典的代码. |
经常碰到这种情况，先记录下来，以后参考。
第一种方法：
set rs=server.CreateObject("adodb.recordset")
rs.open "select top 1 id from info order by id desc",conn,1,1
if not rs.bof and not rs.eof then
maxid=rs("id")
end if
rs.close
function suiji()
Randomize
suiji=Int((maxid - 1+ 1) * Rnd + 1)
end function
'然后开始随即提取记录
i=0
do while i<6
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from info where id="&suiji(),conn,1,1
if not rs.bof and not rs.eof then
i=i+1
response.write "你现在随即提取的记录的id是"&rs("id")&"<br>"
end if
rs.close
loop
第二种方法：
sql="select top 6 * from info where pass=1 ORDER BY rnd(-time()-id)"
优势比较：
第二种方法修改起来比较简单，但是受时间限制，在同一分钟内刷新内容不会变动，
第一种方法相对比较复杂，但是能够及时更新。
以上代码在access数据库下适用。 |
精品网站程序下载(草根站长最爱)
QQ2013,QQ2012临时会话插件(全国首发)
711旅游网站管理系统V2013（无功能限制）
711幻灯片管理系统（全国首发） 各类网站程序下载
711企业网站管理系统V2013个人版（无功能限制）
711免费在线客服系统个人版 V2.0
电影小偷采集程序V2013免费下载 点此查看
更多的asp实现随机显示新闻请到论坛查看: http://BBS.TC711.COM
【 双击滚屏 】 【 评论 】 【 收藏 】 【 打印 】 【 关闭 】
来源：
互联网
日期：2011-5-31
|
|
|
设为首页 | 
加入收藏
