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%>