asp erkennt, ob es sich um eine chinesische Zeichenfunktion handelt

Prüfen Sie, ob es sich um ein chinesisches Zeichen handelt <%

'******************************

'Funktion: CheckChinese(strng)

'Parameter: string, zu überprüfendes Zeichen

'Beschreibung: Überprüfen Sie, ob es sich um ein chinesisches Zeichen handelt. Rückgabewert: true für Chinesisch, andernfalls false

'Beispiel: <%=CheckChinese(strng)%>

'******************************

Funktion CheckChinese(strng)

CheckChinese = true

Dimmen Sie regEx,Match

Setze regEx = New RegExp

regEx.Pattern = /||/#|/&|/?|/@|/%|/*|//|/.|/,|/;|/'|/:|/-|/_|/ +|/^|/|/=|/<|/>|/

regEx.IgnoreCase = True

Set Match = regEx.Execute(strng)

wenn match.count dann CheckChinese= false

Funktion beenden

%>