Ersätta funktion!

Function ersatta(str)
    str = Replace(str, "ö", "o")
    str = Replace(str, "ä", "a")
    ersatta = Replace(str, "å", "a")
End Function

namn = ersatta(Request.Form("namn"))
epost = ersatta(Request.Form("epost"))

function ersatta(str)
str = Replace(str,"ö","o")
str = Replace(str,"ä","a")
str = Replace(str,"å","a")

[b]ersatta = str[/b]

end function

Lite frågor:

1. Gör denna kod så att all html-kod skrivs ut som text förutom de jag vill ersätta?

Function ersatta(str)
    str = Replace(str, "[b]", "<b>")
    str = Replace(str, "[/b]", "</b>")
    str = Replace(str,"''","'")
    str = Replace(str,vbCrLf,"<br>")
    str = Server.HTMLEncode(str)
    str = ersatta
End Function

Sedan när jag vill spara ned så skriver jag detta under funktionen?

rubrik = ersatta(Request.Form("rubrik"))
datum = now()
skribent = ersatta(Request.Form("skribent"))
epost = ersatta(Request.Form("epost"))
hemsida = ersatta(Request.Form("hemsida"))
meddelande = ersatta(Request.Form("meddelande"))
catid = ersatta(Request.Form("catid"))

If Len("rubrik") > 0 Then
 SQL = "INSERT INTO Tradar (rubrik, datum, skribent, epost, hemsida, meddelande, catid) VALUES ('" & rubrik & "','" & datum & "','" & skribent & "','" & epost & "','" & hemsida & "','" & meddelande & "','" & catid & "')"
 objConn.Execute(SQL)
  Response.Write("<b>Sparat</b>")
End if

Jag hade gjort replacen vid presentationen med undantag för escapesekvenserna. Sedan har du vänt nedanstående rad bak och fram:

str = ersatta

ska vara

ersatta = str

Men i min replace blir ju **<b> och då räknas det som html kod och skrivs därför ut som text men det vill jag ju inte.

hur skall jag göra?**

Flytta upp raden:

str = Server.HTMLEncode(str)

inne i din funktion.

thanks. men hade redan gjort det. =)

Om jag vill vill ignonera all html kod då? Inte skrica ut den som sträng bara ta bort?

Regexp skulle jag tro, kanske ett mönster som plockar bort allt mellan < samt >.

Du bör nog kunna hitta något om du söker.

Aha, var det så krångligt?

Kan man göra så att den endast visar A-Ö, a-ö samt "!","?" och "." .

En variant är att köra ett reguljärt uttryck som plockar ut alla tecken utom dom tillåtna:
[^A-Z,a-z,!\?\.]

Du får sen ersätta dom med tomrum eller liknande.
Vet ej hur du får det att fungera med åäö men det kan säkert någon annan svara på.