Hej alla!

Håller på att testa Replacfunktionen men får inte det att funka riktigt som jag vill. Koden:

<code>
<% Function bTecken(strText)

strText = Replace(strText,"a","@")
strText = Server.HTMLEncode(strText)
strText = LCase(strText)
strText = TRIM(strText)
strText = Replace(strText,vbcrlf," <br>")
bTecken = strText
End Function
%>

<%=bTecken(Request.Form("Mess")%>
</code>

Problemet är att när någon skriver med stora bokstäver så funkar inte replacegrejen, bara när det är skrivet med gemener :( Trodde att det räckte att man tog LCase men icke...

Jodå, det fungerar men du måste köra LCase innan du gör replace

<code>
<% Function bTecken(strText)
strText = LCase(strText)
strText = Replace(strText,"a","@")
strText = Server.HTMLEncode(strText)
strText = TRIM(strText)
strText = Replace(strText,vbcrlf," <br>")
bTecken = strText
End Function
%>

<%=bTecken(Request.Form("Mess")%>
</code>

/Janne

Jisses vad enkelt! Tack så mycket!