Posted By

nicolaspar on 12/19/06


Tagged


Versions (?)

Who likes this?

1 person have marked this snippet as a favorite

umang_nine


ASP - Eregi Para Regex


 / Published in: ASP
 

  1. Function eregi(ByVal str, ByVal patrn,ByVal rpl)
  2. 'EJ, para sacar tags eregi(texto,"<([^>]+)>","")
  3. 'Ej, para sacar los links eregi(texto,"<a([^>]+)>|</a>","")
  4. Set regEx = New RegExp
  5. regEx.Pattern = patrn
  6. regEx.IgnoreCase = True
  7. regEx.Global = True
  8. StrReplace = regEx.Replace(str,rpl)
  9. eregi = StrReplace
  10. End function

Report this snippet  

You need to login to post a comment.