ASP生成指定位数的随机密码

程序代码

<%

function genPassword(length)

Randomize

do until len(newPass) = length

code = Int((74 * Rnd) + 48)

if not((code >= 58 and code <= 64) or (code >= 91 and code <= 96)) then

newPass = newPass & chr(code)

end if

loop

genPassword = newPass

end function

response.write genpassword(512)

%>