ASP随机涵数生成100条8位字母和数字混合密码

　　<%for i = 1 to 100%>
　　<%
　　Randomize
　　pass=""
　　Do While Len(pass)<8 '随机密码位数
　　num1=CStr(Chr((57-48)*rnd+48)) '0~9
　　num2=CStr(Chr((122-97)*rnd+97)) 'a~z
　　pass=pass&num1&num2
　　loop
　　'原创:www.devdao.com
　　%>
　　<%=pass%><br>
　　<%next%>