Return to Snippet

Revision: 2026
at December 19, 2006 06:26 by nicolaspar


Initial Code
Function eregi(ByVal str, ByVal patrn,ByVal rpl)
'EJ, para sacar tags eregi(texto,"<([^>]+)>","")
'Ej, para sacar los links eregi(texto,"<a([^>]+)>|</a>","")
		 Set regEx = New RegExp
		 regEx.Pattern = patrn
		 regEx.IgnoreCase = True
		 regEx.Global = True
		 StrReplace = regEx.Replace(str,rpl)
		eregi = StrReplace
End function

Initial URL

                                

Initial Description

                                

Initial Title
ASP - Eregi Para Regex

Initial Tags

                                

Initial Language
ASP