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

韩冰

dim char_array(35)

( k. K% b( v+ X! C4 n

char_array(0) = '0'

+ F* @, L0 B9 u% H. j4 J

char_array(1) = '1'

char_array(2) = '2'

0 ~/ ~2 }4 b2 v# v

char_array(3) = '3'

& O) `0 I& F/ _

char_array(4) = '4'

. q: Y0 l: \+ Q/ m( ~% R" c" T6 W

char_array(5) = '5'

char_array(6) = '6'

char_array(7) = '7'

char_array(8) = '8'

char_array(9) = '9'

. {. @7 }: z R9 q' I `3 H0 }& Q. C. P

char_array(10) = 'A'

& p" E3 u' z. F j7 c- w5 u

char_array(11) = 'B'

char_array(12) = 'C'

char_array(13) = 'D'

char_array(14) = 'E'

char_array(15) = 'F'

char_array(16) = 'G'

char_array(17) = 'H'

char_array(18) = 'I'

& \+ Y4 ^$ p# B5 p( i5 ]1 @

char_array(19) = 'J'

" u) n2 E! }; v/ @. X

char_array(20) = 'K'

! J1 Z: E. Q( `2 I

char_array(21) = 'L'

! S, `$ x, r! f3 D

char_array(22) = 'M'

char_array(23) = 'N'

8 @% J5 ~: d7 n: {

char_array(24) = 'O'

: Z5 S# H" I/ V$ d8 `+ I$ P

char_array(25) = 'P'

7 W1 ]9 a9 f( g% T

char_array(26) = 'Q'

9 R3 V4 G$ s% Z6 K' G. h8 q

char_array(27) = 'R'

- D. W! W! N/ q! a+ m

char_array(28) = 'S'

char_array(29) = 'T'

char_array(30) = 'U'

6 B+ K" W! l, g1 W

char_array(31) = 'V'

7 q4 P6 v( b0 c' u+ Q: y6 J& D

char_array(32) = 'W'

$ h3 A( O0 p' k. V' z; p& m5 J

char_array(33) = 'X'

char_array(34) = 'Y'

, z" P' B$ Y) b8 g4 s8 T* b- k+ {

char_array(35) = 'Z'

randomize

7 c( ^" ]. a" E/ a

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

output = output + num

# o5 L4 p7 P$ g9 J

loop

/ t5 g. F/ f; C9 G# Q

gen_key = output

& p! e( v- G1 a5 Q" _# W/ o

End Function

/ \% m3 o* w! `" O1 m$ L

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

) i* `2 R: B$ b# p0 v

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

char_array(36) = 'a'

8 G( L. m; t3 [) A

char_array(37) = 'b'

( M7 }. u* j0 |( ~& F% S

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

4 Q! O6 i; U5 a* h

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

兄弟

强悍啊