Asp生成13位随机字符串的方法
发布时间:2023-12-21 15:21:59 所属栏目:Asp教程 来源:DaWei
导读: Asp生成13位随机字符串的方法:
<html>
<title>
</title>
<body>
<%
Function gen_key(digits)
’定义并初始化数组
dim char_array(80)
’初始化数字
For i = 0 To 9
<html>
<title>
</title>
<body>
<%
Function gen_key(digits)
’定义并初始化数组
dim char_array(80)
’初始化数字
For i = 0 To 9
Asp生成13位随机字符串的方法: <html> <title> </title> <body> <% 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 Timer’初始化随机数生成器。 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(13) response.write "</center>" %> </body> </html> (编辑:威海站长网) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |
推荐文章
站长推荐