Metode ini bagus karena dapat menghasilkan string acak yang terdiri dari karakter huruf kecil dan angka. Anda dapat menambahkan beberapa karakter khusus dan beberapa huruf besar, dll. '***************************************
'asp menghitung angka acak
'***************************************
Fungsi randomStr(intLength)
Redupkan strSeed, seedLength, pos, Str, i
strSeed = abcdefghijklmnopqrstuvwxyz1234567890
panjang benih = Len(strSeed)
Str =
Acak
Untuk i = 1 Ke intPanjang
Str = Str + Tengah(strSeed, Int(seedLength * Rnd) + 1, 1)
Berikutnya
acakStr = Str
Fungsi Akhir