Replace av HTML taggar

netzMedlem sedan okt. 20058 inlägg

12 okt. 2005 06:45#1

På ett litet projekt jag håller på med så skall dom 5 senaste nyheternas första 100 tecken visas på startsidan, + Rubrik och Datum. Klickar man sedan på nyheten i fråga så visas hela nyheten. Enkelt så långt.
Problemet är att jag inte vill att några HTML taggar skall vara inblandade i visningen på startsidan, Dels är det inte nödvändigt, och dels ställer det till lite problem. Men man ska kunna använda sig av allehanda taggar i nyheterna, exempelvis tabeller och sånt.

Server.HTMLEncode gör ju förvisso att HTML koden inte körs, men det blir inte snyggt. Visst kan man använda Replace, men om man exempelvis byter ut <table> mot "" så hjälper ju inte det om man exempelvis råkar skriva <table width="....

Kort och gott skulle jag vilja ha hjälp med den enklast möjliga lösningen på att utesluta allt från och med < till och med > så inga HTML taggar varken körs eller visas.

Jag är lite av lekman på den här fronten, så det kan ju vara så att det är barnsligt enkelt för den som kan.

Tacksam för hjälp

Erik JuhlinMedlem sedan maj 200010 687 inlägg

12 okt. 2005 07:08#2

Function RemoveHTML(ByVal sHTML)
	With New RegExp
		.Global = True
		.Pattern = "<[^>]*>"
		RemoveHTML = .Replace(sHTML & "", "")
	End With
End Function

Response.Write RemoveHTML("<html><body>asdf<hr>qwerty</body></html>")

netzMedlem sedan okt. 20058 inlägg

12 okt. 2005 07:44#3

Tack så mycket, det ser iaf ut som att det fungerar nu :)