精美而实用的网站,关注web编程技术、网站运营、SEO推广,让您轻松愉快的学习

用ASP代码随机生成字符串,使用了Array数组、for循环和Rnd函数来实现,并最终生成13位的随机字符串输出到客户端浏览器,以下为详细代码和注释。

ASP生成指定位数的随机字符串函数

<%
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
'返回结果
response.write "生成的十三位随机字符串为:"
response.write "<center>"
response.write gen_key(23)
response.write "</center>"
%>
Tags:ASP 随机字符串 Array