2 replace i samma sats

Hur får man in ytterligare en replace i <%=Server.HTMLEncode(replace(rs("message"),"=============",vbCrLf))%>

jag vill ha in replace(rs("message"),"<","''")
och helst replace(rs("message"),">","''") också

Använd en funktion! ;)

Function repIT(str)
	str = Server.HTMLEncode(str)
	str = Replace(str, ,"=============", vbCrLf)
	str = Replace(str, "<", "''")
	str = Replace(str, ">", "''")
	repIT = str
End Function

Sen är det bara att köra:

Response.Write(repIT(rs("message")))

/r
*Om du använder HTMLEncode innan de andra, behövs väl inte de två sista replace?
< resp. > blir ju till > resp < så "<" resp. ">" kommer inte existera...??

Eller har jag helt fel?*

Du kan låta returvärdet ifrån en Replace vara parameter i en annan Replace, precis som du låter returnvärdet ifrån Rreplace vara parameter i Server.HTMLEncode. Exempel:

<%=Server.HTMLEncode(Replace(Replace(Replace(value, "...", "..."), "...", "..."), "...", "..."))%>