网站广播 本站提供的源码经过测试,配有前台及后台管理界面演示图,希望对大家有帮助!
ASP生成不重复随机数的实例代码
2014-11-14 08:17:14    【 】   浏览:
本文介绍了ASP生成不重复随机数的方法,asp生成不重复随机数的实例代码,有需要的朋友参考下。

青海快三走势图带连线 www.w4nzf.cn
例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) '开始数字,结尾数字,生成多少个 
%>


Tags:ASP 生成 不重复 随机数 实例 代码
】【打印繁体】【关闭】 【返回顶部
上一篇asp自动刷新页面的实现方法总结 下一篇ASP实现301域名重定向代码

广告推荐

ASP技术文章推荐阅读

  • 海南省人民政府关于加快发展互联网产业的若干意见政策解读 2018-07-14
  • 晋城市举办干部素质提升工程第十八期专题讲座 2018-07-13
  • 养生谣言肆虐 微信圈不可全信 2018-07-13
  • 全市产业扶贫现场工作推进会暨培训会召开 2018-07-12
  • 蕅益大师:学道要想成就 必须要学这两件事 2018-07-12
  • 深圳罗湖人才市场门口垮塌已致1死多伤 有人被困[组图] 2018-07-11
  • 贵州仁怀:端午时节制曲忙 2018-07-11
  • 庆祝中国人民解放军建军90周年大会 2018-07-10
  • 嘿嘿,高手过招一出手就知有没有。武艺来不的半点花拳绣腿的! 2018-07-10
  • 私塾女孩在家上学十四年 父亲坦言这是小众教育模式  2018-07-09
  • 张家口市把巡察监督触角延伸到基层 开展交叉巡察发现问题1246个 2018-07-08
  • 摇碎一湖金:迷失相机里 如何读懂西湖之美? 2018-07-08
  • 为应对督察 江苏如皋一工厂违法掩埋危险废物 2018-07-07
  • 武汉市武昌区:“一网打尽·双网融合”服务群众零距离 2018-07-07
  • 业界专家热议金融科技创新:从严监管利好市场长远发展 2018-07-06
  • 911| 863| 130| 216| 170| 707| 353| 897| 154| 466|