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

韩冰

dim char_array(35)

char_array(0) = '0'

char_array(1) = '1'

D8 ^; f1 D; e

char_array(2) = '2'

; M8 X! ]1 m' B

char_array(3) = '3'

char_array(4) = '4'

' j& I& I4 B. k. [. I4 {! O

char_array(5) = '5'

char_array(6) = '6'

char_array(7) = '7'

char_array(8) = '8'

$ b$ ^; a; ?1 e

char_array(9) = '9'

char_array(10) = 'A'

* M) l0 a9 c6 w @" m; I

char_array(11) = 'B'

9 g, Y+ Q' T+ N6 U

char_array(12) = 'C'

char_array(13) = 'D'

; E, {& n0 Y2 B% c! g1 t3 U4 r, P

char_array(14) = 'E'

9 V4 m% l- y: R$ K) J9 A; ~( b

char_array(15) = 'F'

1 \! F* T; u* z! x8 v! u

char_array(16) = 'G'

4 ]8 C$ C3 V2 s

char_array(17) = 'H'

char_array(18) = 'I'

char_array(19) = 'J'

; L% X0 o% b' ?; W2 s

char_array(20) = 'K'

6 K- U8 a F3 N$ V: Q

char_array(21) = 'L'

0 p: ?% c4 l3 v- [/ \) m/ q

char_array(22) = 'M'

char_array(23) = 'N'

* i( m( ^* O6 q9 `9 m8 l" ^

char_array(24) = 'O'

char_array(25) = 'P'

5 i: o) e% U, ]- i

char_array(26) = 'Q'

char_array(27) = 'R'

; w* m3 Q+ W/ E9 h7 @

char_array(28) = 'S'

$ `$ I$ n" h6 u6 F+ P0 W; r

char_array(29) = 'T'

char_array(30) = 'U'

7 K4 s$ m% P& X* c

char_array(31) = 'V'

3 I8 s2 z, U6 x" l, t4 P

char_array(32) = 'W'

char_array(33) = 'X'

% W6 T7 a2 Z6 Q* [9 z1 Y$ Q, o

char_array(34) = 'Y'

char_array(35) = 'Z'

randomize

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

9 e$ L* G/ r; ] y3 L g2 D

output = output + num

( `8 ~/ y- d6 V, f

loop

$ x, @! `5 I7 e+ l9 k. d

gen_key = output

( Z' q' L2 E+ _/ {

End Function

- [: C. v2 _8 `9 D8 a; |! F' l

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

# M! n1 j' G6 F+ v9 y% w8 R

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

( ?& V6 b5 E/ \) o9 E7 ~

char_array(36) = 'a'

, T& M5 {0 D4 m O/ {

char_array(37) = 'b'

$ f* o( m3 @8 g0 ]7 g

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

9 {, d+ R# c, b) g

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

兄弟

强悍啊