Este método é bom. Ele pode gerar uma sequência aleatória de caracteres minúsculos e números. Você pode adicionar alguns caracteres especiais e algumas letras maiúsculas, etc. '************************************
'asp calcula números aleatórios
'************************************
Função randomStr(intLength)
Dim strSeed, seedLength, pos, Str, i
strSeed = abcdefghijklmnopqrstuvwxyz1234567890
comprimento da semente = Len(strSeed)
Str =
Randomizar
Para i = 1 para intLength
Str = Str + Mid(strSeed, Int(seedLength * Rnd) + 1, 1)
Próximo
aleatórioStr = Str
Função final