ASP正则函数

人气:
790
日期:
2018/11/16
HTML 网页设计 W3C 790

摘要: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后面得东西都给丢掉




Copyright © 2014 ASP技巧教程源码大全 All Rights Reserved
晋ICP备14006235号-3 页面执行时间:92.773毫秒 返回顶部

?分享按钮