8个asp生成随机字符串的函数

function MyRandc(n)
’生成随机字符，n为字符的个数 ，该随机函数由大小写字母组成，不含数字
dim thechr
thechr = ""
for i=1 to n
    dim zNum,zNum2
    Randomize
    zNum = cint(25*Rnd)
    zNum2 = cint(10*Rnd)
    if zNum2 mod 2 = 0 then
     zNum = zNum + 97
    else
     zNum = zNum + 65
    end if
    thechr = thechr & chr(zNum)
next
MyRandc = thechr
end function

使用方法：

MyRandc(n) 生成随机字符，n为字符的个数，

如：
response.write MyRandn(10)
输出10个随机英文字母字符

查看更多...

Tags: asp