如果后面的某某公司是固定的,可以直接 replace(字串,"某某公司","")
如果后面的中文不是固定的,就这样:
function delCN(ms)
Dim objRegEx, Match, Matches
Set objRegEx = New RegExp
objRegEx.Pattern = "[\u4E00-\u9FA5]+"
objRegEx.Global = True
Set Matches = objRegEx.Execute(ms)
myReplace=objRegEx.replace(ms,"")
Set Matches = Nothing
Set objRegEx = Nothing
delCN=myreplace
end function
response.write delCN("ABCDE中国公司")
使用"某某"二字对它分割
不知道是什么用处,为何不在数字和文字中间加上分隔符?