asp实现生成由数字,大写字母,小写字母指定位数的随机数

% ''****************************** ''函数:gen_key(digits) ''参数:digits----要生成随机数的位数 ''作者:阿里西西 ''日期:2007/7/13 ''描述:生成由数字,大写字母,小写字母指定位数的随机数;返回值:要生成的指定倍数的随机数 ''示例:%=gen_key(8)% ''****************************** Functiongen_key(digits) ''定义并初始化数组 dimchar_arr

作者: 来源: 时间: 17-11-23 15:26:57

<%
''******************************
''函数:gen_key(digits)
''参数:digits----要生成随机数的位数
''作者:阿里西西
''日期:2007/7/13
''描述:生成由数字,大写字母,小写字母指定位数的随机数;返回值:要生成的指定倍数的随机数
''示例:<%=gen_key(8)%>
''******************************
Function gen_key(digits)
''定义并初始化数组
    dim char_array(80)
   ''初始化数字
    For i = 0 To 9
        char_array(i) = CStr(i)
    Next
   ''初始化大写字母
    For i = 10 To 35
        char_array(i) = Chr(i + 55)
    Next
   ''初始化小写字母
    For i = 36 To 61
        char_array(i) = Chr(i + 61)
    Next
   Randomize   ''初始化随机数生成器。
   do while len(output) < digits
        num = char_array(Int((62 - 0 + 1) * Rnd + 0))
        output = output + num
    loop
''设置返回值
    gen_key    =    output
End Function
%>
11
22
33
隐藏区块

会员注册

本功能为预留功能,暂不支持注册 ^_^

Login

社交帐号登陆

使用以下任意帐号可登陆本站

Close section
Close

联系我们

关于5UCMS 您有任何需求 均可以留言给我们