asp 下产生任意位数随机密码的代码
摘要：
<%
'******************************
'函数：MakePassword(byvalmaxlen)
'参数：maxlen，要生成的密码位数长度
'作者：阿里西西
'日期：2007/7/12
'描述：产生任意位数随机密码
'示例：<%=MakePassword(8)%>
'******************************
functionMakePassword(byvalmaxlen)
dimstrnewpass
dimwhatsnext,upper,lower,intcounter
randomize
forintcounter=1tomaxlen
whatsnext=int((1-0+1)*rnd+0)
ifwhatsnext=0then
'character
upper=90
lower=65
else
upper=57
lower=48
endif
strnewpass=strnewpass&chr(int((upper-lower+1)*rnd+lower))
next
makepassword=strnewpass
endfunction
%>
【asp 下产生任意位数随机密码的代码】相关文章：
★ 虚拟主机重启代码
上一篇：
asp 将日期格式化为需要的格式
下一篇：
asp下返回以千分位显示数字格式化的数值