<%
'*********************************
'Funktion: isvalidusername (Byvalusername)
'Parameter: Benutzername, Benutzername
'Autor: Alixi
'Datum: 2007/7/15
'Beschreibung: Überprüfen Sie, ob der Benutzername illegale Zeichen enthält, ohne illegale Zeichen zurückzugeben: Richtig
Beispiel: Isvalidusername (Byvalusername)
'*********************************
Functionisvalidusername (Byvalusername)
Dimi, c
Isvalidusername = true
Fei = 1tolen (Benutzername)
C = Lase (Mid (Benutzername, i, 1))
IfInstr ("$! <>?#^%@~` &*();:+= '"", c)> 0Then
Isvalidusername = false
Ausgangsfunktion
Endif
Nächste
Endfunktion
%>