Generating random string

[John]

Hi

I need to generate a string of six random characters to act as the first
password. Is there an example of how to do this somewhere?

Thanks

Regards

[OHM \( One Handed Man \)]

Private Function newPassword() As String

Dim r As New Random(Now.Second)
Dim str As String = String.Empty
For i As Integer = 1 To 6
str = str & Convert.ToChar((r.Next(33, 127)))
Next

Return str

End Function

--
( OHM ) - One Handed Man
AKA Terry Burns - http://TrainingOn.net
"John" <Jo**@nospam.infovis.co.uk> wrote in message
news:%2******************@TK2MSFTNGP03.phx.gbl...

Hi

I need to generate a string of six random characters to act as the first
password. Is there an example of how to do this somewhere?

Thanks

Regards

[Trevor Braun]

Or...
Guid.NewGuid.ToString().Substring(0,6).ToUpper()

That will generate a random enough string for a password.

Trevor Braun

"John" <Jo**@nospam.infovis.co.uk> wrote in message
news:%2******************@TK2MSFTNGP03.phx.gbl...

Hi

I need to generate a string of six random characters to act as the first
password. Is there an example of how to do this somewhere?

Thanks

Regards

[OHM \( One Handed Man \)]

Your snippit, is I admit concise, and to be honest, I probably would not
have thought of it, but it will only return 0-9 - A-F, so it may not suit
the strength that the Op Wants.

Nice quick style though !

--
( OHM ) - One Handed Man
AKA Terry Burns - http://TrainingOn.net

"Trevor Braun" <tb**********************@codetrue.com> wrote in message
news:eP**************@TK2MSFTNGP03.phx.gbl...

Or...
Guid.NewGuid.ToString().Substring(0,6).ToUpper()

That will generate a random enough string for a password.

Trevor Braun

"John" <Jo**@nospam.infovis.co.uk> wrote in message
news:%2******************@TK2MSFTNGP03.phx.gbl...

Hi

I need to generate a string of six random characters to act as the first
password. Is there an example of how to do this somewhere?

Thanks

Regards