Ver Mensaje Individual
  #2 (permalink)  
Antiguo 19/10/2007, 03:30
Avatar de Ascariz
Ascariz
 
Fecha de Ingreso: noviembre-2005
Mensajes: 403
Antigüedad: 19 años, 5 meses
Puntos: 0
Re: Eliminar HTML

ESte es mi codigo y me da este error por que es ?

en PHP hay una funcion que se llama: strip_tags($nombre); La hay en ASP ????


Código:
	texto = "hola  < http://www.dominio.com/images/esp/cab_envio_email.jpg >123< fdew fndew d > fds fds fd"
	'texto_aux = "hola  < http://www.dominio.com/images/esp/cab_envio_email.jpg >123< fdew fndew d > fds fds fd"
	'texto_aux = "hola  123< fdew fndew d > fds fds fd"
	'texto_aux = "hola  123 fds fds fd"
	texto = replace(texto,"<","&lt;")
	texto = replace(texto,">","&gt;")
	texto_aux = texto
	response.Write(InStr(texto_aux,"&lt;")& "<br />")
	tiene = cint(InStr(texto_aux,"&lt;"))
	while tiene > 0
		response.Write("<br />"&texto_aux& "<br />")
		pos1 = cint(InStr(texto_aux,"&lt;"))
		pos2 = cint(InStr(texto_aux,"&gt;"))
		response.Write(pos1 & " " & pos2)
		texto_aux = Mid(texto,1,pos1-1)
		response.Write("<br />"&texto_aux)
		texto_aux =  texto_aux & Mid(texto,pos2+4,len(texto))	
		response.Write("<br />"&texto_aux)
		tiene = InStr(texto_aux,"&lt;")	
	wend
	response.Write("<br />"&texto_aux)
__________________
Desarrollador & Diseñador Web
Diseño de paginas web en Madrid