最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
asp 常用正则表达式
时间:2022-06-30 10:51:11 编辑:袖梨 来源:一聚教程网
Public Function CheckRegExp(sources,para)
If para="[username]" Then
para="^[.A-Za-z0-9u4e00-u9fa5]+$"
End If
If para="[password]" Then
para="^[a-z0-9]+$"
End If
If para="[email]" Then
para="^([0-9a-zA-Z]([-.w]*[0-9a-zA-Z])*@([0-9a-zA-Z][-w]*.)+[a-zA-Z]*)$"
End If
If para="[homepage]" Then
para="^[a-zA-Z]+://[a-zA-z0-9-./]+?/*$"
End If
If para="[nojapan]" Then
para="[u3040-u30ff]+"
End If
If para="[guid]" Then
para="^w{8}-w{4}-w{4}-w{4}-w{12}$"
End If
If para="[idcard]" Then
para="^d{17}(d|x)$"
End If
Dim re
Set re = New RegExp
re.Global = True
re.Pattern = para
re.IgnoreCase = False
CheckRegExp = re.Test(sources)
End Function
%>
相关文章
- 荒原曙光奇物愈合珍珠怎么获得 奇物愈合珍珠获取攻略 10-15
- 荒原曙光黏土怎么获得 黏土获取攻略 10-15
- 荒原曙光奇物收容箱子怎么获得 奇物收容箱子获取攻略 10-15
- 荒原曙光雪莲怎么获得 雪莲获取攻略 10-15
- 荒原曙光怎么驯服动物 驯服动物方法 10-15
- 洛克王国世界火灵石怎么获得 火灵石获取攻略 10-15