1 <% 2 Randomize 3 Do While Len(pass)<12 ‘随机密码位数 4 num1=CStr(Chr((57-48)*rnd+48)) ‘0~9 5 num2=CStr(Chr((90-65)*rnd+65)) ‘A~Z 6 num3=CStr(Chr((122-97)*rnd+97)) ‘a~z 7 pass=pass&num1&num2&num3 8 loop 9 %> 10 11 <%=pass%>
原文：https://www.cnblogs.com/sunyzone/p/12439159.html