漢字かどうかをチェック <%
「******************************」
'関数: Check Chinese(strng)
'パラメータ: strng、検証する文字
'説明: 中国語の文字かどうかを確認し、戻り値: 中国語の場合は true、それ以外の場合は false
'例: <%=Check Chinese(strng)%>
「******************************」
関数チェック中国語(strng)
中国語を確認 = true
ディム正規表現、一致
正規表現 = 新しい正規表現を設定します
regEx.Pattern = /||/#|/&|/?|/@|/%|/*|//|/.|/,|/;|/'|/:|/-|/_|/ +|/^|/|/=|/<|/>|/
regEx.IgnoreCase = True
マッチ = regEx.Execute(strng) を設定します。
match.count の場合、Check Chinese= false
終了機能
%>