Hi freunde
Kurze frage, wie kann ich ein Text abfragen, der sich zwischen einem Text befindet.
In diesem beispiel frage ich Nutzernamen ab, und vergleiche diese mit Wörter aus einer Datei.
Wenn jetzt das Wort "Kuchen" auf der Blacklist steht, und sich der Nutzer bspw. "IchMagKuchen" nennt, wird dieser nicht gekickt.
Wie kann ich das machen das auch ein Wort (Oder Zeichen) Zwischen Verschiedenen Wörtern als Bad name angezeigt wird?
Sprich:
Kuchen ist eines der Wörter auf der Blacklist
"Kuchen" = Bad name
"IchBinEinKuchen" = Bad name
"KuchenSindCool" = Bad name
"xXKuchenXx" = Bad name
und so das er die Groß und Kleinschreibung Ignoriert.
Mein code sieht wie folgt aus:
Spoiler anzeigen
Kurze frage, wie kann ich ein Text abfragen, der sich zwischen einem Text befindet.
In diesem beispiel frage ich Nutzernamen ab, und vergleiche diese mit Wörter aus einer Datei.
Wenn jetzt das Wort "Kuchen" auf der Blacklist steht, und sich der Nutzer bspw. "IchMagKuchen" nennt, wird dieser nicht gekickt.
Wie kann ich das machen das auch ein Wort (Oder Zeichen) Zwischen Verschiedenen Wörtern als Bad name angezeigt wird?
Sprich:
Kuchen ist eines der Wörter auf der Blacklist
"Kuchen" = Bad name
"IchBinEinKuchen" = Bad name
"KuchenSindCool" = Bad name
"xXKuchenXx" = Bad name
und so das er die Groß und Kleinschreibung Ignoriert.
Mein code sieht wie folgt aus:
VB.NET-Quellcode
- Public Shared Function Check(ByVal Name As String) As Integer
- Dim Username As String = Name
- Dim BlacklistReader As New System.IO.StreamReader(".\blacklist.txt")
- Dim BlacklistLines As String = BlacklistReader.ReadToEnd
- BlacklistReader.Close()
- Dim Val As Integer
- For Each i As String In BlacklistLines.Split(vbCrLf.ToCharArray, StringSplitOptions.RemoveEmptyEntries)
- If Username = i Then
- If Username = "Survivor" Then
- Val = 1
- Else
- Val = 2
- End If
- Exit For
- End If
- Val = 0
- Next i
- Return Val
- End Function[/spoiler][spoiler]
MfG, Martin