ASP 正则函数替换分页后的参数
实现代码如下:Function DRexPage(Str) Dim RegEx If IsNull(Str) Or Str="" Then Exit Function Set RegEx=New RegExp RegEx.IgnoreCase=True RegEx.pattern="(\&)
实现代码如下:Function DRexPage(Str) Dim RegEx If IsNull(Str) Or Str="" Then Exit Function Set RegEx=New RegExp RegEx.IgnoreCase=True RegEx.pattern="(\&)
Function DRexPage(Str)Dim RegExIf IsNull(Str) Or Str="" Then Exit FunctionSet RegEx=New RegExpRegEx.IgnoreCase=TrueRegEx.pattern="(\&)?page=(\d)+"