Why not just make it fully random? This function returns a random
upper case string of the specified length, though you could easily set
it up to include lower case, numbers and symbols.
Private Function genRandomString(ByVal iLen As Integer) As String
Dim r As Random
Dim i As Integer
Dim sRet As String
r = New Random(34653)
For i = 1 To iLen
Thread.Sleep(1000)
sRet = sRet + Chr(r.Next(0, 25) + 65)
Next
genRandomString = sRet
End Function
On 5/11/05, Julian Voelcker <[EMAIL PROTECTED]> wrote:
> Hi All,
>
> Do any of you have any suggestions for auto-generating some temp
> passwords.
>
> I need some temp passwords for when users first log into a system.
> Once in, they can change their passwords to something more to their
> liking.
>
> I was thinking of trying to do something along the lines of combining
> the user's surname with the current day and then encoding it in some
> way and then using the first x characters?
>
> Any thoughts?
> --
> Cheers,
>
> Julian Voelcker
> Cirencester, United Kingdom
>
>
> Yahoo! Groups Links
>
>
>
>
>
--
Dean Fiala
Very Practical Software, Inc
http://www.vpsw.com
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/AspNetAnyQuestionIsOk/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
