<%
Function TextFormat(vartext)
TextFormat = replace(varText,Chr(13),"<br>")
TextFormat = replace(TextFormat,"<br><tr>","<tr>")
TextFormat = replace(TextFormat,"<tr><br>","<tr>")
TextFormat = replace(TextFormat,"</tr><br>","</tr>")
TextFormat = replace(TextFormat,"</td><br>","</td>")
End Function
%>
Slik brukes / kalles funksjonen:
<%
Response.Write(TextFormat(varInnhold))
%>
(varInnhold er variabel som inneholder teksten som skal formateres) |