asp檢測是否為中文字符函數(shù)
更新時間：2009年02月21日 03:46:55 作者：
檢測是否為中文字符
<%
'******************************
'函數(shù)：CheckChinese(strng)
'參數(shù)：strng,待驗證字符
'描述：檢測是否為中文字符，返回值：中文為true，否則false
'示例：<%=CheckChinese(strng)%>
'******************************
Function CheckChinese(strng)
CheckChinese = true
Dim regEx, Match
Set regEx = New RegExp
regEx.Pattern = "\||\#|\&|\?|\@|\%|\*|\/|\.|\,|\;|\'|\:|\-|\_|\+|\^|\""|\=|\<|\>|\ "
regEx.IgnoreCase = True
Set Match = regEx.Execute(strng)
if match.count then CheckChinese= false
End Function
%>
'******************************
'函數(shù)：CheckChinese(strng)
'參數(shù)：strng,待驗證字符
'描述：檢測是否為中文字符，返回值：中文為true，否則false
'示例：<%=CheckChinese(strng)%>
'******************************
Function CheckChinese(strng)
CheckChinese = true
Dim regEx, Match
Set regEx = New RegExp
regEx.Pattern = "\||\#|\&|\?|\@|\%|\*|\/|\.|\,|\;|\'|\:|\-|\_|\+|\^|\""|\=|\<|\>|\ "
regEx.IgnoreCase = True
Set Match = regEx.Execute(strng)
if match.count then CheckChinese= false
End Function
%>
相關(guān)文章
原理也相對簡單，就是利用date函數(shù)獲取日期，然后通過固定的字符串?dāng)?shù)組進(jìn)行替換。2009-02-02
我們經(jīng)常會遇到多重查詢問題，而長長的SQL語句往往讓人丈二和尚摸不著頭腦。特別是客戶端部分填入查詢條件時，如用普通方法將更是難上加難。 以下巧妙地利用"where 1=1"的恒等式（事實上很多，讓它值為TRUE即可）解決此問題。2008-09-09
巧用FileSystem組件實現(xiàn)WEB應(yīng)用中的本地特定打印的方法
巧用FileSystem組件實現(xiàn)WEB應(yīng)用中的本地特定打印的方法...2007-04-04
ASP生成柱型體，折線圖，餅圖源代碼提供了...2007-11-11
如何通過ASP管理NT帳號...2007-01-01
2008-01-01
本人常用的asp代碼...2006-08-08
用asp實現(xiàn)網(wǎng)頁郵箱訪問的方法...2007-04-04
[橙色][醬色][紫色][綠色]簡單分頁函數(shù)一 常用...2006-08-08
A利用ASP小偷和Google實現(xiàn)在線翻譯功能的代碼
A利用ASP小偷和Google實現(xiàn)在線翻譯功能的代碼...2007-11-11