function isDigit(s) { var patrn=/^[0-9]{1,20}$/; if (!patrn.exec(s)) return false return true } //校验登录名:只能输入5-20个以字母开头、可带数字、“_”、“.”的字串 function isRegisterUserName(s) { var patrn=/^[a-zA-Z]{1}([a-zA-Z0-9]|[._]){4,19}$/; if (!patrn.exec(s)) return fal
代码如下:Function DRexPage(Str) Dim RegEx If IsNull(Str) Or Str=”” Then Exit Function Set RegEx=New RegExp RegEx.IgnoreCase=True RegEx.pattern=”(\&)?page=(\d)+” DRexPage=regEx.replace(Str,””) ‘(Str,”$1″) Set RegEx=Nothing End Function
Function DRexPage(Str) Dim RegEx If IsNull(Str) Or Str=”” Then Exit Function Set RegEx=New RegExp RegEx.IgnoreCase=True RegEx.pattern=”(\&)?page=(\d)+” DRexPage=regEx.replace(Str,””) ‘(Str,”$1″) Set RegEx=Not