加入收藏 | 设为首页 | 会员中心 | 我要投稿 聊城站长网 (https://www.0635zz.com/)- 智能语音交互、行业智能、AI应用、云计算、5G!
当前位置: 首页 > 站长学院 > Asp教程 > 正文

ASP生成不重复随机数的例子代码

发布时间:2023-04-24 13:40:02 所属栏目:Asp教程 来源:
导读:本文介绍了ASP生成不重复随机数的方法,asp生成不重复随机数的实例代码,有需要的朋友参考下。

例1,ASP生成随机数,很简单:

代码示例:

Randomize '纯随机,不重复

Response.write Int((9999999
本文介绍了ASP生成不重复随机数的方法,asp生成不重复随机数的实例代码,有需要的朋友参考下。
 
例1,ASP生成随机数,很简单:
 
代码示例:
 
Randomize '纯随机,不重复
 
Response.write Int((999999999 * Rnd) + 111111111) '生成111111111到999999999之间随机数
 
例2,ASP不重复随机数:

代码示例:
 
<%
 
'--------------------
 
'-生成随机数
 
function rndarray(istart,iend,sum)
 
dim arrayid(),i,j,blnre,temp,iloop,eloop
 
redim arrayid(sum-1)
 
i=0
 
iloop=0
 
eloop=0
 
blnre=false
 
randomize
 
do while i
 
temp=int(rnd*(iend-istart+1)+istart)
 
if i=0 then
 
arrayid(0)=temp
 
i=i+1
 
iloop=iloop+1
 
else
 
for j=0 to i-1
 
if arrayid(j)=temp then
 
blnre=true
 
iloop=iloop+1
 
exit for '防止多余的循环
 
else
 
iloop=iloop+1
 
end if
 
next
 
 if blnre=false then
 
 arrayid(i)=temp
 
 i=i+1
 
 else
 
 blnre=false
 
 end if
 
end if
 
loop
 
rndarray=join(arrayid)
 
end function
 
response.write rndarray(1,5,1) '开始数字,结尾数字,生成多少个
 
%>
 
 
 

(编辑:聊城站长网)

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

    推荐文章