asp如何利用当前时间生成随机函数?
来源:asp之家 时间:2010-01-01 15:44:00
下面,我们就从当前时间来取得随机数,调用的时候用包含文件就可以了:
<!--#INCLUDE VIRTUAL="/quote.asp"-->
代码:
quote.asp
<%
Set MyFileObj = Server.CreateObject("Scripting.FileSystemObject")
Set MyTextFile = MyFileObj.OpenTextFile("c:\quote.txt")
' 设置好路径
IF NOT MyTextFile.AtEndOfStream THEN
header = CInt(MyTextFile.ReadLine)
' 读表头
END IF
RANDOMIZE
' 生成基于表头的随机数, RANDOMIZE语句对确保一个随机数非常重要
RandomValue = INT(header*RND)+1
Count=0
' 循环直到行号等于随机数,保存在变量引用
WHILE NOT MyTextFile.AtEndOfStream AND NOT Count = RandomValue
quote = MyTextFile.ReadLine
Count = Count + 1
WEND
' 关闭文本文件
MyTextFile.Close
%>
<HTML>
<BODY>
现在引用的是: <%=quote%>
</BODY>
</HTML>
标签:时间,随机,函数
0
投稿
猜你喜欢
python判断无向图环是否存在的示例
2022-07-05 18:39:55
模拟下拉菜单[兼容IE系列以及火狐]
2009-12-13 10:23:00
详解微信小程序文件下载--视频和图片
2023-08-10 16:38:50
vue 解决mintui弹窗弹起来,底部页面滚动bug问题
2024-04-30 10:47:22
pytorch使用tensorboardX进行loss可视化实例
2021-04-07 20:17:36
python可视化plotly 图例(legend)设置
2021-05-17 11:17:56
ZABBIX3.2使用python脚本实现监控报表的方法
2021-04-11 20:15:02
学习createTrackbar的使用方法及步骤
2021-07-29 20:02:52
Python lambda表达式原理及用法解析
2021-03-02 18:52:12
Javascript Ajax异步读取RSS文档具体实现
2024-05-09 10:36:56
用js来解决ajax读取页面乱码
2024-04-18 10:56:04
使用Keras预训练好的模型进行目标类别预测详解
2023-02-04 09:14:37
python图形用户界面tkinter之按钮Button的使用说明
2022-09-14 06:48:28
Python反爬虫伪装浏览器进行爬虫
2023-07-05 22:33:38
CentOS6.5设置Django开发环境
2022-09-29 22:55:30
Python实现打印九九乘法表的不同方法总结
2023-05-25 01:05:19
利用Python绘制数据的瀑布图的教程
2023-03-09 02:33:42
一篇文章让你搞清楚JavaScript事件循环
2024-04-19 09:53:02
对于Python中线程问题的简单讲解
2023-12-28 10:16:31
SQL Server服务器内存升级后的烦恼
2008-12-22 10:55:00