最新下载
热门教程
- 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
%>
相关文章
- 《无限暖暖》天星之羽获得位置介绍 12-20
- 《流放之路2》重铸台解锁方法介绍 12-20
- 《无限暖暖》瞄准那个亮亮的成就怎么做 12-20
- 《无限暖暖》魔气怪终结者完成方法 12-20
- 《无限暖暖》曙光毛团获得位置介绍 12-20
- 《无限暖暖》日光果获得位置介绍 12-20