Como ignorar codigo HTML?

[Noodle 0]

Pessoal,Tenho noticias cadastradas no banco.. essas noticias estao formatadas utilizando codigo html... só que tenho uma parte do site que só mostro uma parte da noticia e gostaria que utilizasse uma formatacao padrao.. ou seja, que ignore o codigo html que está na noticia... alguem sabe se tem como fazer isso?

[Elbrinner 0]

você poderia tentar fazer uma funçao que troca todas as tags por espaço vazio. Ou usar uma funçao para corta o html

[mx loco 1]

Segue uma função que tira todo conteudo HTML de seu texto:

 

Function LimpaHTML(TXtNoticia)	Do While True	  ini	= InStr(1,TXtNoticia,"<")	  If ini  = 0 Then Exit Do	  fim	= InStr(ini,TXtNoticia,">")	  parcial = Mid(TXtNoticia,ini,fim-ini+1)	  TXtNoticia= Replace(TXtNoticia,parcial,"")	Loop	LimpaHTML  = TXtNoticiaEnd Function

[Noodle 0]

Segue uma função que tira todo conteudo HTML de seu texto:

Function LimpaHTML(TXtNoticia)	Do While True	  ini	= InStr(1,TXtNoticia,"<")	  If ini  = 0 Then Exit Do	  fim	= InStr(ini,TXtNoticia,">")	  parcial = Mid(TXtNoticia,ini,fim-ini+1)	  TXtNoticia= Replace(TXtNoticia,parcial,"")	Loop	LimpaHTML  = TXtNoticiaEnd Function

Vlw loco.. funcionou!!! http://forum.imasters.com.br/public/style_emoticons/default/joia.gif