正则表达式验

时间：2016.04.20 发布人：qz309823883

已解决问题

谷歌qz309823883用户在2016.04.20提交了关于“王牌进化正则表达式验”的提问，欢迎大家涌跃发表自己的观点。目前共有1个回答，最后更新于2025-03-01T21:09:38。希望大家能够帮助她。

详细问题描述及疑问：期待您的答案，我不知道说什么才好,除了谢谢！

希望以下的回答，能够帮助你。

第1个回答

用户名：QQ516882787 时间：2016.04.21

＃策＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃
＃作蘸雨浪　版权所有，翻版说一下　　　　　＃
＃ＱＱ：２７０４９９４５８　　　　　　　　　＃
＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃

近段日子几个刚学了正则表达式的朋友问我在asp中怎么用．呵呵．虽然简单，还是写出来吧，正则表达式的基本知识我就不说了．其实已经前题提伯波市政率对血有很多这样的文章了．：（

＃＃＃＃＃函数代码＃旧状斗轻心陆乐＃＃＃＃＃＃＃
假设为myfunc.asp

<%
'正则表表达式验误风饭宣克案章沉准编快函数patrn-正攻宣领厂权则表达式　strng况复-需要验的字符展说体国聚爱新串
FunctionRegExpTest(patrn,strng)
DimregEx,retVal夫展眼映势血物密普元'建立变量。
SetregEx=NewRegExp'建立正则表达式。
regEx.问答Pattern=pat帮修重rn'设置模式。
regEx.IgnoreCase=False'设置是否区分大小写。
retVal=regEx.Test(strng)'执行搜索测试。
R粉持院概温器式保奏破egExpTest=retVal'返回不尔值，不符合就返回false，符合为true
EndFunction
%>

＃＃＃＃＃提交页早话养苦面代码＃＃＃＃＃＃
威分普探粉官州假设为mypage.asp

<formmethod="post"action=孩"check.asp">
请输入E-mail地址:<inputtype=textname=email>
<br>
请输入电话号码:<inputtype=text满利执坐name=tel>
<input项深绍包type=submitvalue="确定">
</form>

＃＃＃＃＃验页面＃＃＃＃＃＃＃＃
雨量观济玉提入假设为check.as挥围观古思径它按括而p


<%
tel=request.form("tel")
email=request.form("email")
dimfounderr:founderr=false'建立变量,正确或者失败标记
'大家注意哦,顺便我在这里贡献一个正则表达式,同时验电话号码和手机号码的!
ifRegExpTest("(^[0-9]{3,4}\-[0-9]{3,8}$)|(^[0-9]{3,8}$)|(^$[0-9]{3,4}$[0-9]{3,8}$)|(^0{0,1}13[0-9]{9}$)",tel)=falsethen
founderr=true
regshow=regshow&"<li>您输入的电话号码格式不正确"
endif
ifRegExpTest("^[\w-]+(\.[\w-]+)*@[\w-]+(\.[\w-]+)+$",email)=falsethen
founderr=true
regshow=regshow&"<li>您输入的电子邮箱格式不正确"
endif
iffounderr=falsethenregshow="<li>您输入的格式都是正确的哦"
%>
<br><br>
<%=regshow%>