ASP示例教程：如何生成13位随机字符串

发布时间：2023-07-25 14:01:54 所属栏目：Asp教程来源：

导读：ASP实例教程本文为你介绍如何生成随机字符串，本实例介绍如何生成13位随机字符串。

<html>

<title>

建站学生成随机字符串www.cuoxin.com</title>

<body>

<%

Function gen_key(digits)

&

ASP实例教程本文为你介绍如何生成随机字符串，本实例介绍如何生成13位随机字符串。

<html>

<title>

建站学生成随机字符串www.cuoxin.com</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>

（编辑：聊城站长网）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!