Hur skriver man vill komma runt problemet med folk som skriver in " hej ' i" idag "" '' bla bla

Function bytut(text)
text = Replace(text), "'", "''")
text = Replace(text, "", "''")
bytut = text
End Function


mvh Magnus

<%
Function SQLText(Value)
If Len(Value) > 0 Then
SQLText = "'" & Replace(Value, "'", "''") & "'"
Else
SQLText = "Null"
End If
End Function

Dim strSQL


strSQL = "INSERT INTO TabellNamn (FältNamn) VALUES (" & SQLText(" hej ' i"" idag "" '' bla bla") & ")"


%>