Esta función viene a ser muy útil si deseamos eliminar las etiquetas HTML desde un sitio web en ASP.

1
2
3
4
5
6
7
8
 
Function RemoveHTML( strText )
	Dim RegEx
	Set RegEx = New RegExp
	RegEx.Pattern = "<[^>]*>"
	RegEx.Global = True
	strText = Replace(LCase(strText), "<br>", chr(10))
	RemoveHTML = RegEx.Replace(strText, "")
End Function

Vía: Aspalliance

Comparte esta anotación Hora de publicación 3:05 pm
Escrito por: Antonio Paredes Blogs que comentan sobre esta anotación
Lee más sobre: Trucos