function filteJapanese(sStr)
dim oRegExp
set oRegExp = new RegExp
oRegExp.global = true
oRegExp.pattern = "[\u3040-\u309F|\u30A0-\u30FF]"
filteJapanese = oRegExp.replace(sStr,"")
set oRegExp = nothing
end function
dim oRegExp
set oRegExp = new RegExp
oRegExp.global = true
oRegExp.pattern = "[\u3040-\u309F|\u30A0-\u30FF]"
filteJapanese = oRegExp.replace(sStr,"")
set oRegExp = nothing
end function
 我来说两句 |
对此文章发表了评论 |
评论列表 （最新 评论仅限网友观点！）
推荐文章
