ASP正则函数替换分页后的参数
摘要：FunctionDRexPage(Str)DimRegExIfIsNull(Str)OrStr=""ThenExitFunctionSetR...
FunctionDRexPage(Str)
DimRegEx
IfIsNull(Str)OrStr=""ThenExitFunction
SetRegEx=NewRegExp
RegEx.IgnoreCase=True
RegEx.pattern="(&)?page=(d)+"
DRexPage=regEx.replace(Str,"")'(Str,"$1")
SetRegEx=Nothing
EndFunction
在分页系统里面用到的把page后面得东西都给丢掉
【ASP正则函数替换分页后的参数】相关文章：
上一篇：
正则表达式不包含属性