|
|
DESARROLLADOR
Como extraer tags HTML usando expresiones regularesPor Ronald Flores
|
|
|
Es posible que en algún momento necesitemos obtener datos de un usuario en nuestras páginas. No obstante, muchas veces personas se aprovechan de los formularios o "form submits" para enviar todo tipo de spam, especialmente el que contiene código en HTML.
La siguiente función en ASP clásico permite extraer todos los tags de una hilera o "string". El resultado es un texto que no incluye nada códigos HTML ni cualquier texto entremedio. Esto es especialmente útil al momento de capturar una página y dear solamente el texto relevante.
Cómo utilizar la funciónUtilizar esta función es muy fácil. Simplemente llame la misma de la siguiente manera:
<%
str_html = "<a href=""target.htm"">ENLACE Y CODIGO HTML</a>"
stripped_text = stripHTML(str_html)
response.write stripped_text
%>
Note que la función eliminará todo lo que sea HTML y dejará afuera lo que esté fuera del código HTML. El resultado de este código es el siguiente:
ENLACE Y CODIGO HTML
La función a continuación.
Function stripHTML(strHTML)
'Strips the HTML tags from strHTML
Dim objRegExp, strOutput
Set objRegExp = New Regexp
objRegExp.IgnoreCase = True
objRegExp.Global = True
objRegExp.Pattern = "<(.|\n)+?>"
'Replace all HTML tag matches with the empty string
strOutput = objRegExp.Replace(strHTML, "")
'Replace all < and > with < and >
strOutput = Replace(strOutput, "<", "<")
strOutput = Replace(strOutput, ">", ">")
stripHTML = strOutput 'Return the value of strOutput
Set objRegExp = Nothing
response.write stripHTML
End Function
Este artículo ha sido visto 251 veces.
Más artículos y Noticias
|
|
|
|
Microsoft anuncia BETA de Vista SP2 ya disponible
12/7/2008 8:34:41 PM
Pioneer debuta disco óptico de 400GB, planifica 1TB para 2013
12/4/2008 9:09:50 PM
Debuta DirecTV HD con canales y programación exclusivos
11/29/2008 5:50:21 PM
|
|
|
| No reviews yet. Be the first one to rate this location! |
|
|
|
|
|
|
©2008 PuertoRico
Internet News. Todos los derechos, reservados. Prohibida la
reproducción de cualquier material sin permiso del autor. Para
información adicional, comuníquese a articulos@printernetnews.com |
|
|
Noticias Anteriores |
 |
|
|
Negocios >> Generales
BUDAPEST - Los precios del crudo cayeron por debajo de los 54 dólares el barril, luego que los somb...
11/29/2008 5:48:44 PM
|
Software >> Sistemas Operativos
Microsoft anunció esta semana el primer vistazo a una versión de prueba del Sistema Operativo suceso...
11/27/2008 10:15:58 PM
|
Tecnología >> Computadoras y Laptops
San Juan, Puerto Rico, 24 de noviembre de 2008 – Fácil de aprender, fácil de usar y fácil para jug...
11/24/2008 9:53:36 PM
|
Tecnología >> Celulares y Equipos Móviles
La compañía Apple anunció la disponibilidad de una actualización a su popular iPhone 3G y iPod Touch...
11/21/2008 9:45:31 PM
|
Sociedad >> Educación
SAN JUAN, Puerto Rico, 18 de noviembre de 2008 — Microsoft anunció hoy la disponibilidad en Puerto R...
11/21/2008 9:25:42 PM
|
Software >> Internet y Navegadores
Actualmente en el Internet, existen diversas opciones para navegar el mismo. Desde el pseudo-estánda...
11/15/2008 6:34:34 AM
|
|
| |
|
|
|
