ASP生成随机密码的又一种方法

韩冰

dim char_array(35)

5 v) Q4 Z! C0 v) ?) o

char_array(0) = '0'

3 o s5 l: m5 z) n5 b9 B' n3 X$ ^

char_array(1) = '1'

char_array(2) = '2'

char_array(3) = '3'

char_array(4) = '4'

8 g8 O* W( B% M& {! b

char_array(5) = '5'

; |+ h0 @# @! c, b) G

char_array(6) = '6'

/ f# O) a2 r h% a2 A$ C+ {3 x

char_array(7) = '7'

' e& P# B$ B* j7 C; F- K

char_array(8) = '8'

7 r, U. S s, |" y

char_array(9) = '9'

1 s. B- u9 W5 |8 ? S/ S, g1 y

char_array(10) = 'A'

. q! Q2 I+ u5 e6 [5 F; J

char_array(11) = 'B'

- F. {4 g, l# t% O& L: \. m- @

char_array(12) = 'C'

char_array(13) = 'D'

; ^0 ~( c1 g% t& Q, ? E

char_array(14) = 'E'

) J4 D) b, Y# b$ b% D

char_array(15) = 'F'

4 L; |: g% l9 {/ f

char_array(16) = 'G'

char_array(17) = 'H'

: F8 r7 b* u# h* c& b# r

char_array(18) = 'I'

char_array(19) = 'J'

; K. ?! C) L! P$ o4 M& |: n* } O

char_array(20) = 'K'

char_array(21) = 'L'

char_array(22) = 'M'

char_array(23) = 'N'

! b q7 t, n& p c0 g

char_array(24) = 'O'

char_array(25) = 'P'

, [+ P1 l( \; ~+ B) B: U

char_array(26) = 'Q'

char_array(27) = 'R'

char_array(28) = 'S'

& Q, `6 o/ O* \" Q! H5 m* ]; e0 {

char_array(29) = 'T'

char_array(30) = 'U'

$ f* E3 T& A1 {4 c

char_array(31) = 'V'

char_array(32) = 'W'

' d G* ~) D$ \" m

char_array(33) = 'X'

char_array(34) = 'Y'

% t4 i5 b6 r( U- e" I

char_array(35) = 'Z'

. \) z t0 g& C N) Q* |8 _: u& Q

randomize

, W1 }. Y# V& M, E2 Q. O" M. z6 D

do while len(output) num = char_array(Int(35 * Rnd + 0))

output = output + num

+ u) i1 Q' K1 Y# z( F

loop

1 H) b+ z& S6 y! \* Y: u* ~1 c) E

gen_key = output

8 {+ k5 K% {# G; C' P- O* j

End Function

) Q$ P2 Z. [' ^7 d6 I4 O9 U

response.write '随机密码是：' & gen_key(10)

6 d2 o+ J0 D. t4 r0 S

这是一个生成随机数的通用函数，我们首先将所有可能的字符保存在数组内，这里的例子是0-9及26个英文字符，共36个字符。注意数组下标是从0开始的，所以dim char_array(35)，其实表示有36个字符。注意：本例没有专门区分字母的大小写，如果你还要加上“大小写敏感/区分大小写”特性的话，修改数组大小为char_array(50)，然后在后面列出所有可能的小写字符。例如：

char_array(36) = 'a'

' i" Z( l3 ]# C) U

char_array(37) = 'b'

...............类推

注意这是一个可以通用的函数，gen_key(digits)它传进一个参数digits，代表要生成的随机密码位数。今后要生成20为密码就用gen_key(20)即可打印出密码，或者将它保存在数据库内。

兄弟

强悍啊