KeyGen nur mit Buchstaben?

Hi leute,
habe hier folgende Klasse aus dem Netz geholt:

PHP-Code:

---

Public Class SerialNumber
        Private m_BlockLength As Int64 = 6
        Private m_BlockCount As Int64 = 2
        Private m_Delimiter As String = "-"
        Public Sub New()
        End Sub
        Public Sub New(ByVal BlockLength As Int64, ByVal BlockCount As Int64)
            m_BlockLength = BlockLength
            m_BlockCount = BlockCount
        End Sub
        Public Sub New(ByVal BlockLength As Int64, ByVal BlockCount As Int64, _
          ByVal Delimiter As String)

            m_BlockLength = BlockLength
            m_BlockCount = BlockCount
            m_Delimiter = Delimiter
        End Sub

        Private Function Generate(ByVal BlockLength As Int64, _
           ByVal BlockCount As Int64, ByVal Delimiter As String) As String

            Dim si As New StringBuilder
            Dim sb As New StringBuilder
            For n As Int16 = 0 To BlockCount - 1
                Try
                    si.Append(Guid.NewGuid.ToString().Replace("-", "").ToUpper)
                    sb.Append(si.ToString.Substring(n * BlockLength, BlockLength) & Delimiter)
                Catch ex As Exception
                    Throw New Exception("Err0r")
                End Try
            Next

            Return sb.ToString.Substring(0, sb.Length - Delimiter.Length)
        End Function
        Public Overrides Function ToString() As String
            Return Me.Generate(m_BlockLength, m_BlockCount, m_Delimiter)
        End Function

    End Class 


---

Leider gibt sie Buchstaben UND Zahlen aus.

ist es möglich nur Buchstaben zu erhalten? Wenn ja wie?[/quote]

keygen? meinst wohl eher passgen....
hier ist es in der "in2minGeschriebenVersion":

Code:

---

$anzahl=5;
$zeichen=("a","b","c","d","e","f","g","h","i","j","k","l");
for(int i=0;i<$anzahl;++$i)
{
      print($zeichen[rand(0,sizeof($zeichen)]);
}

---

ist das nicht sowas ?!

dein code sieht aus wie vb. Also würd ich sagen falsche Section :)