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 編輯過 |
關鍵字查詢
相關文章
正在查詢... 
|
400 186 1886
