这个方法不错,可以生成小写字符跟数字的随机字符串,大家可以加入一些特殊字符和一些大写字母等。

''************************************* ''asp计算随机数 ''************************************* Function randomStr(intLength) Dim strSeed, seedLength, pos, Str, i strSeed = 'abcdefghijklmnopqrstuvwxyz1234567890' seedLength = Len(strSeed) Str = '' Randomiz

作者: 来源: 时间: 17-11-23 15:52:12

''*************************************
''asp计算随机数
''*************************************

Function randomStr(intLength)
Dim strSeed, seedLength, pos, Str, i
strSeed = "abcdefghijklmnopqrstuvwxyz1234567890"
seedLength = Len(strSeed)
Str = ""
Randomize
For i = 1 To intLength
Str = Str + Mid(strSeed, Int(seedLength * Rnd) + 1, 1)
Next
randomStr = Str
End Function
11
22
33
隐藏区块

会员注册

本功能为预留功能,暂不支持注册 ^_^

Login

社交帐号登陆

使用以下任意帐号可登陆本站

Close section
Close

联系我们

关于5UCMS 您有任何需求 均可以留言给我们