이 방법은 소문자와 숫자로 구성된 임의의 문자열을 생성할 수 있습니다. 일부 특수 문자와 대문자 등을 추가할 수 있습니다. '************************************
'asp는 난수를 계산합니다.
'************************************
함수randomStr(intLength)
Dim strSeed, seedLength, pos, Str, i
strSeed = abcdefghijklmnopqrstuvwxyz1234567890
시드길이 = 길이(strSeed)
Str =
무작위화
i = 1에서 intLength로
Str = Str + Mid(strSeed, Int(seedLength * Rnd) + 1, 1)
다음
무작위Str = Str
기능 종료