28,391
社区成员
发帖
与我相关
我的任务
分享求正则匹配
<textarea name="nf_info" class="InputBox1" id="nf_info" style="width:100%; height:145px;" onKeyUp="value=value.replace(/[^\u4E00-\u9FA5]/g,'')" onbeforepaste="clipboardData.setData('text',clipboardData.getData('text').replace(/[^\u4E00-\u9FA5]/g,''))"></textarea>
这是个文本框 只允许字母 跟数字
我想改成 只允许汉字 跟字母（主要是防止填入电话号码等数字信息）
不能有电话信息
这是个文本框 只允许字母 跟数字
我想改成 只允许汉字 跟字母（主要是防止填入电话号码等数字信息）
不能有电话信息
...全文
请发表友善的回复…
发表回复
后浪 2010-12-08
- 打赏
- 举报
哥们你名字我第一次看到就笑了..
十一文 2010-12-08
- 打赏
- 举报
恭喜 jf
yhtapmys 2010-12-08
- 打赏
- 举报
恭喜 JF
amu1433 2010-12-08
- 打赏
- 举报
Function repnum(strng) '以数组返回
i = 0
Set regEx = New RegExp
regEx.Pattern = "(\d+)" '"[0-9]"
regEx.IgnoreCase = True
regEx.Global = True
Set Matches = regEx.Execute(strng)
For Each Match in Matches
'RetStr = RetStr &"<br>"& Match.Value
If Len(Match.Value)>=5 Then
strng = Replace(strng, Right(Match.Value,4),"***")
End If
i = i + 1
Next
repnum = strng
End Function
已经解决 哈哈 ....结贴 回复就有分
i = 0
Set regEx = New RegExp
regEx.Pattern = "(\d+)" '"[0-9]"
regEx.IgnoreCase = True
regEx.Global = True
Set Matches = regEx.Execute(strng)
For Each Match in Matches
'RetStr = RetStr &"<br>"& Match.Value
If Len(Match.Value)>=5 Then
strng = Replace(strng, Right(Match.Value,4),"***")
End If
i = i + 1
Next
repnum = strng
End Function
已经解决 哈哈 ....结贴 回复就有分
CainLai 2010-12-08
- 打赏
- 举报
/[^\u4E00-\u9FA5a-zA-Z]/g
