asp生成指定長度位數(shù)的隨機(jī)字母和數(shù)字組合
當(dāng)前位置：點晴教程→知識管理交流
→『 技術(shù)文檔交流 』
<%@ Language=VBScript %>
<html>
<head><title>Random Letters and Numbers</title></head>
<body>
<%
' 定義要生成的長度
Dim length As Integer = 10
' 創(chuàng)建一個空字符串變量來存放結(jié)果
Dim result As String = ""
' 獲取當(dāng)前時間作為種子值
Randomize()
' 根據(jù)指定的長度生成隨機(jī)字母和數(shù)字
For i = 1 To length
' 生成一個隨機(jī)索引（范圍從0到35）
Dim index As Integer = Int((Rnd * (length - 1)) + 1)
' 判斷索引所對應(yīng)的字符類型并添加到結(jié)果字符串中
If index < 26 Then
' 如果小于等于25則表示是大寫字母
result = result & Chr(index + 64)
ElseIf index >= 26 And index <= 35 Then
' 如果介于26和35之間則表示是數(shù)字
result = result & CStr(index - 25)
End If
Next
' 輸出結(jié)果
Response.Write("Generated random letters and numbers: " & result)
%>
</body>
</html> 該文章在 2024/1/19 0:13:12 編輯過 |
關(guān)鍵字查詢
相關(guān)文章
正在查詢... 
|
400 186 1886
