Asp 生成随机字符串13位(循环输出500次无报错)

本文介绍了一个使用VBScript编写的简单脚本,该脚本能生成指定长度的随机字符串,包括数字和小写字母。通过随机化函数和数组来实现字符的选择。
<%@   LANGUAGE   =   VBScript   %>   


 
<%   
  
'参数digits,表示随机数的位数   
  Function   GetKey(digits)   
    
  
dim   char_array(36)   
  
dim   output,num   
  char_array(
0)   =   "0"   
  char_array(
1)   =   "1"   
  char_array(
2)   =   "2"   
  char_array(
3)   =   "3"   
  char_array(
4)   =   "4"   
  char_array(
5)   =   "5"   
  char_array(
6)   =   "6"   
  char_array(
7)   =   "7"   
  char_array(
8)   =   "8"   
  char_array(
9)   =   "9"   
  char_array(
10)   =   "a"   
  char_array(
11)   =   "s"   
  char_array(
12)   =   "d"   
  char_array(
13)   =   "f"   
  char_array(
14)   =   "e"   
  char_array(
15)   =   "f"   
  char_array(
16)   =   "g"   
  char_array(
17)   =   "h"   
  char_array(
18)   =   "i"   
  char_array(
19)   =   "j"   
  char_array(
20)   =   "k"   
  char_array(
21)   =   "l"   
  char_array(
22)   =   "m"   
  char_array(
23)   =   "n"   
  char_array(
24)   =   "o"   
  char_array(
25)   =   "p"   
  char_array(
26)   =   "q"   
  char_array(
27)   =   "r"   
  char_array(
28)   =   "s"   
  char_array(
29)   =   "t"   
  char_array(
30)   =   "u"   
  char_array(
31)   =   "v"   
  char_array(
32)   =   "w"   
  char_array(
33)   =   "x"   
  char_array(
34)   =   "y"   
  char_array(
35)   =   "z"   
    
  
randomize   
    
  
do   while   len(output)   <   digits   
  num   
=   char_array(Int((35)   *   Rnd   +   0))   
  output   
=   output   +   num   
  
loop   
    
  GetKey   
=   output   
  
End   Function
  
  
'把结果返回给浏览器   
  response.write   "本实例生成的十三位随机字符串为:"   
  response.write   
"<center>"   
  
for j = 0 to 500
    response.write   GetKey(
13)   
    response.write   
"<br>"  
  
next
   
  response.write   
"</center>"   
  %
>
 
评论
成就一亿技术人!
拼手气红包6.0元
还能输入1000个字符
 
红包 添加红包
表情包 插入表情
 条评论被折叠 查看
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值