Fungsi acak ASP menghasilkan 100 kata sandi campuran alfanumerik 8 digit
Penulis:Eve Cole
Waktu Pembaruan:2009-06-23 17:00:08
<%untuk i = 1 hingga 100%>
<%
Acak
lulus=""
Do While Len(lulus)<8 'Digit kata sandi acak
angka1=CStr(Chr((57-48)*rnd+48)) '0~9
angka2=CStr(Chr((122-97)*rnd+97)) 'a~z
lulus=lulus&angka1&angka2
lingkaran
'Asli: www.devdao.com
%>
<%=lulus%><br>
<%berikutnya%>