Nasil yanlis filtreleme yaparsiniz?

iyi yakalanmis bir açik. görünüste fonksiyon girdiyi temizliyor gibi görünüyor. dikkatli olmak lazim...

anlamadigim açiklardan birisi :(
bende webwiz kullanicisiyim ben bundan bir sey anlamadim

'Format SQL Query funtion
Private Function formatSQLInput(ByVal strInputEntry)
'Remove malisous charcters from sql
strInputEntry = Replace(strInputEntry, "\'", "\'", 1, -1, 1)
strInputEntry = Replace(strInputEntry, """", "", 1, -1, 1)
strInputEntry = Replace(strInputEntry, "'", "''", 1, -1, 1)
strInputEntry = Replace(strInputEntry, "[", "[", 1, -1, 1)
strInputEntry = Replace(strInputEntry, "]", "]", 1, -1, 1)
strInputEntry = Replace(strInputEntry, "<", "<", 1, -1, 1)
strInputEntry = Replace(strInputEntry, ">", ">", 1, -1, 1)
'Return
formatSQLInput = strInputEntry
End Function

bu kodlar replace etmiyormu :S