어떻게 랜 덤 비밀 번 호 를 만 드 는 함 수 를 만 듭 니까?

<%response.write makePassword(16)function makePassword(byVal maxLen)Dim strNewPassDim whatsNext, upper, lower, intCounterRandomizeFor intCounter = 1 To maxLen    whatsNext = Int((1 - 0 + 1) * Rnd + 0)If whatsNext = 0 Then        upper = 90        lower = 65Else        upper = 57        lower = 48End If        strNewPass = strNewPass & Chr(Int((upper - lower + 1) * Rnd + lower))Next        makePassword = strNewPass      ' 문자 범위 지정.end function%>[1]

좋은 웹페이지 즐겨찾기