codice univoco casuale di 2 caratteri

[Kalman]

Ho fatto una funzione

Function Random2Chars() As String
        Static rand As New Random
        Dim Mystr As New System.Text.StringBuilder(2)

        For i As Integer = 1 To 2
            Dim indice As Integer
            indice = rand.Next(65, 90)
            Mystr.Append(Convert.ToChar(indice))
        Next
        Return Mystr.ToString()
End Function

che puoi richiamare con

Response.Write(Random2Chars())

Fammi sapere
Ciao
Kalman