<%
Function FixaTecken(str)
str = Server.HTMLEncode (str)
str = Replace (str, "ditten", "datten")
FixaTecken = Replace(str, vbCrLf, "<BR>" & vbCrLf)
End function
%>
Mvh,
Frågan#1
Jag har en funktion som fixar radbrytningar i ett script.
Nu vill jag lägga till så att den även friserar apostrofer och annat som kan tänkas behövas.
Jag får helt enkelt inte till det. Function ser ut såhär:
<%
Function FixaTecken(str)
FixaTecken = Replace(str, vbCrLf, "<BR>" & vbCrLf)
End function
%>
Och raden där jag hämtar function:
<%=FixaTecken(Server.HTMLEncode(RecSet("eventInfo")))%>