您所在的位置:小祥子 » 编程 » ASP » 正文

ASP生成指定个数的每位数字都不一样的随机密码

时间:2015-02-09 编辑:本站 来源:本站原创

随机数我之前已经介绍过了,今天我再给大家介绍下配合do while循环生成随机数字,并且让每个随机数都不一样。比如生成个6位数的随机数吧,并且全部都互相不一样,一般这个用于密码的生成。

代码如下

<% '生成随机6位数字
randomize '这个必须的
dim a1,a2,a3,a4,a5,a6,a7 '定义变量
a1=Int(10 * Rnd)

a2=Int(10 * Rnd)
do while a1=a2
a2=Int(10 * Rnd)
loop

a3=Int(10 * Rnd)
do while a1=a3 or a2=a3
a3=Int(10 * Rnd)
loop

a4=Int(10 * Rnd)
do while a1=a4 or a2=a4 or a3=a4
a4=Int(10 * Rnd)
loop

a5=Int(10 * Rnd)
do while a1=a5 or a2=a5 or a3=a5 or a4=a5
a5=Int(10 * Rnd)
loop

a6=Int(10 * Rnd)
do while a1=a6 or a2=a6 or a3=a6 or a4=a6  or a5=a6
a6=Int(10 * Rnd)
loop

a7=a1&a2&a3&a4&a5&a6
%>

关键词:随机 ASP 数字 密码