asp生成指定长度位数的随机字母和数字组合
当前位置:点晴教程→知识管理交流
→『 技术文档交流 』
<%@ Language=VBScript %>
<html>
<head><title>Random Letters and Numbers</title></head>
<body>
<%
' 定义要生成的长度
Dim length As Integer = 10
' 创建一个空字符串变量来存放结果
Dim result As String = ""
' 获取当前时间作为种子值
Randomize()
' 根据指定的长度生成随机字母和数字
For i = 1 To length
' 生成一个随机索引(范围从0到35)
Dim index As Integer = Int((Rnd * (length - 1)) + 1)
' 判断索引所对应的字符类型并添加到结果字符串中
If index < 26 Then
' 如果小于等于25则表示是大写字母
result = result & Chr(index + 64)
ElseIf index >= 26 And index <= 35 Then
' 如果介于26和35之间则表示是数字
result = result & CStr(index - 25)
End If
Next
' 输出结果
Response.Write("Generated random letters and numbers: " & result)
%>
</body>
</html> 该文章在 2024/1/19 0:13:12 编辑过 |
关键字查询
相关文章
正在查询... |