ASP 正则函数替换分页后的参数
2016-02-19 09:53
有一种朋友不在生活里，却在生命力；有一种陪伴不在身边，却在心间。图老师即在大家的生活中又在身边。这么贴心的服务你感受到了吗？话不多说下面就和大家分享ASP 正则函数替换分页后的参数吧。
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
![mysql 常用命令集锦[绝对精华]](http://img.tulaoshi.com/201602/19/5f29900496e50597d441b6a9a874e559_thumb_189.jpg)
