<%
'***********************************
'Função: CheckString (strng)
'Parâmetro: strng, string a ser verificado
'Autor: Alixi
Data: 2007/7/13
'Descrição: detecte se uma string é uma combinação de letras e números puros
'Exemplo: <%= checkString (strng)%>
'***********************************
FunctionCheckString (strng)
CheckString = true
Dimregex, corresponde
SetRegex = newRegexp
regex.pattern = "^[a-za-z0-9]+$"
regex.IGNORECASE = true
SetMatch = regex.execute (strng)
ifMatch.CountThencheckString = false
Função final
%>
Detectar se é um personagem chinês
<%
'***********************************
'Função: Checkchhenese (strng)
'Parâmetro: strng, personagem a ser verificado
'Autor: Alixi
Data: 2007/7/13
'Descrição: Detecte se é um personagem chinês, valor de retorno: true em chinês, caso contrário, falso
'Exemplo: <%= verificação (strng)%>
'***********************************
FunctionCheckChinese (strng)
Verificação de seleção = true
Dimregex, corresponde
SetRegex = newRegexp
regex.pattern = "/||/#|/& |? |/@|/%|/*| // |/. |/, |/; |/'|/: |/-|/_ |/+|/^|/" "|/= |/<| ////"
regex.IGNORECASE = true
SetMatch = regex.execute (strng)
ifMatch.CountThencheckChinese = false
Função final
%>