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%>
posted on 2020-03-07 23:09 sunyzone 阅读(280) 评论(0) 收藏 举报
博客园 © 2004-2026 浙公网安备 33010602011771号 浙ICP备2021040463号-3