可用的ASP无重复数字随机函数, 数组实现, 并应用在随机显示记录

发布时间：2023-09-13 14:24:41 所属栏目：Asp教程来源：

导读：站长测试可用的ASP无重复数字随机函数, 数组实现, 并应用于随机显示记录集

作用:

本函数适用于随机显示小数量的随机不重复数字

本函数适用于显示小数量的随机不重复记录集

为了不影响效率, 上限超过

站长测试可用的ASP无重复数字随机函数, 数组实现, 并应用于随机显示记录集

作用:

本函数适用于随机显示小数量的随机不重复数字

本函数适用于显示小数量的随机不重复记录集

为了不影响效率, 上限超过一千, 不建议使用本函数

shawl.qiu

2006-09-06

http://blog.csdn.net/btbtd

主内容: 函数及应用函数随机显示100条记录

linenum

复制代码代码如下:

<%

    dim rs, rNum

    dim temp

    set rs=createObject("adodb.recordset")

        rs.open "select top 100 * from rnd_v1",conn,1

        rNum=rs.recordCount-1

        for each temp in fRndNoRpt(0,rNum)

            rs.move temp

            response.write rs("sbcat")

            response.write "<br/>"

            rs.movefirst

        next

        rs.close

    set rs=nothing 'shawl.qiu code'

    function fRndNoRpt(lwNum,upNum)

    ''''''''''''''''''''''''''''''''''''''''''''

    ' ASP 无重复数字随机函数, 数组实现, By shawl.qiu

    ' 2006-09-06

    '   http://blog.csdn.net/btbtd

    '''''''''''''''''''''''''''''''''

    ' 注意: 随机数超过1000, 不建议使用本函数.

    '''''''''''''''''''''''''''''''''

    ' 参数说明:

    '''''''''''''''''''''''''''''''''

    ' lwNum 为数字数组下限, 如: 1

    ' upNum 为数字数组上限, 如: 100

    '''''''''''''''''''''''''''''''''

    ' sample call:

    '''''''''''''''''''''''''''''''''

    '    dim t

（编辑：聊城站长网）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!