<%for i = 1 to 100%><% '100为生成的个数 Randomizepass=""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&num2loop '原创:www.cnhww.com%><%=pass%><br><%next%>