zl程序教程

您现在的位置是:首页 >  移动开发

当前栏目

asp随机字符串函数

ASP 函数 字符串 随机
2023-06-13 09:14:07 时间
"*************************************
"asp计算随机数
"*************************************

FunctionrandomStr(intLength)
DimstrSeed,seedLength,pos,Str,i
strSeed="abcdefghijklmnopqrstuvwxyz1234567890"
seedLength=Len(strSeed)
Str=""
Randomize
Fori=1TointLength
Str=Str+Mid(strSeed,Int(seedLength*Rnd)+1,1)
Next
randomStr=Str
EndFunction