ej tillåta html

Jag använder den här koden för att ta bort html:

<%= Server.HTMLEncode(RS("text")) %>

men den tar ju bort alla <br> också.
finns det något sätt att formatera texten innan den läggs in i databasen och att alla <br> finns kvar?

Ändra inte på texten när du lägger den i databasen. Ändringar på texten görs bäst när du plockar ut den från databasen.

<%
Function formatString(ByVal sString)
	If IsEmpty(sString) Then Exit Function

	sString = Replace(sString, vbcrlf," <BR> ")

	'## -- return formatted text --
	formatString = sString
End Function

strText = rs("text")
Response.Write formatString(strText)
%>

Funktionen kan med fördel läggas i en inkluderings fil som sedan inkluderas på de sidor den behöver användas på

cya,
PatrikB

------------------
*Det tar sig sa han som hade eld i håret*

Jag får ett syntax error på den funktionen.
Microsoft VBScript compilation error '800a03ea'

Syntax error

/hockeytown/artiklar.asp, line 52

Function formatString(ByVal sString)
^

Varför ska man använda sig av en funktion där Patrik...tycker du att jag borde använda det om jag skulle använda den tre gånger på en sida?

Vad är fördelarna att ha den i en funktion? Mindre kod blir det ju definitivt men vad är de andra fördelarna?

------------------
Alltid lär man sig något nytt varje dag...

Funktionen får INTE ligga i tex en loop.

Lukaspojken:
Ja, blir ju mindre att skriva än att på varje ställe där jag vill använda den skriva hela replace ......
Då räcker det med att bara anropa denna funktion.

cya,
PatrikB

------------------
*Det tar sig sa han som hade eld i håret*

Det fungerar inte riktigt. Html taggarna fungerar i alla fall