En password generator i javascript

Jeg har for en tid haft et pw eller registreringsnr script kørende i VBscript. Det er OK , men giver mig ikke det random alfanumeriske pw, som jeg forventer, når det kører på nettet:

Function MakePassword(intAntaltegn)
            Dim intChooser,x,intWildChar, strpassword
           
              For x = 1 To intAntalTegn
                Randomize
                intChooser = Int(Rnd * 2) + 1
                Select Case intChooser
                Case 1
                  intWildChar = Int(Rnd * 57) + 65
                  If intWildChar => 91 And intWildChar <= 96 Then
                    intWildChar = intWildChar + 8
                  End If
                  strPassword = strPassword & Chr(intWildChar)
                Case Else
                  intWildChar = Int(Rnd * 9) + 1
                  strPassword = strPassword & intWildChar
                End Select
              Next
              MakePassword = strPassword
End Function

Jeg ville høre om nogen havde noget liggende et jscript/javascript baseret på alegoritmer som:

<SCRIPT language="JavaScript">

function rand(number) {
    var rndm = new Date().getTime();
    rndm = ((rndm*9301+49297) % 233280)/233280;
    return Math.ceil(rndm*number);
}

</SCRIPT>

HENRIK