当前位置: 首页 > 图文教程 > 网络编程 > ASP > 产生随机滚动信息

ASP
FrontPage 2000+DB2实现数据库信息发布
Execel文件插入到ASP页面
利用ASP在客户端注册DLL文件
1栏分页显示(附显示的形式前页,后页)
1栏分页显示(附显示的形式[1][2])
一个基于web的QQ程序 2(xml+asp)
XMLHTTP+javascript+Asp写得聊天室,无刷新实现(一)
XMLHTTP+javascript+Asp写得聊天室,无刷新实现(二)
XMLHTTP+javascript+Asp写得聊天室,无刷新实现(三)
XMLHTTP+javascript+Asp写得聊天室,无刷新实现(四)
XMLHTTP+javascript+Asp写得聊天室,无刷新实现(五)
XMLHTTP+javascript+Asp写得聊天室,无刷新实现(六)
建立一个广告交换及跟踪系统
如何制作无状态的ASP组件
无组件文件上传代码实例
建立动态下拉式选单(三阶层)
用ASP编写的“俄罗斯方块游戏”
利用ASP.NET来访问Excel文档
初探SSI网页制作
具有自攻击性的代码

ASP 中的 产生随机滚动信息


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 89 ::
收藏到网摘: n/a

  产生随机滚动信息 (Charles Carroll/蜘蛛精 译)
Random Advice / Rotating Information by Charles Carroll
本页演示了通过产生随机数的方式实现出现随机滚动信息的方法

RND函数

INT函数

SELECT CASE

代码randomadvice.asp演示了当每次页面被刷新时,上面的会随机出现不同的信息

<html><head>
<TITLE>randomadvice.asp</TITLE>
</head>
<body bgcolor="#FFFFFF">
<%
' generate a random number 1-6
randomize
randomnum=int(rnd*6)+1
SELECT CASE randomnum
CASE 1,2,3%>
   Plant your crops early this year<br>
   No frost expected<br>
<%CASE 4%>
   Never play cards<br>with a man named after a city<br>
<%CASE 5%>
   You can never be too rich, too thin or backup too often<br>
<%CASE 6%>
   A swallow keeps away the stork<br>
<%END SELECT%>
</body></html>