首页 / 正则表达式 / 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   

在分页系统里面用到的把page后面得东西都给丢掉