When I display only the first 200 characters of the story as a brief teaser, something funny happens. If on chance, the 200th character is within an html formating tag, the formating continues on through the loop and displays into the next brief description, and so on.

 

Here is the code to display the brief story description:

 

 

<p class="text"><% = (left(rsStory("STORY_DESCRIPTION"), 200))  %>  ...</p>

 

I would think that removing the html formating tags prior to browser display would do it, but does anyone know how to do that?

 

ie: 

 

txt = rsStory("STORY_DESCRIPTION")

 

txt2 = replace(txt,< htmlformatcode >, "")

 

and then

 

<p class="text"><% = (left(txt2), 200))  %>  ...</p>

 

Sound good in my head, but ...

 

anybody have any good suggestions? How would I do this?

 

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