allora ho usato quel replace che mi sembra ottimo

Function FixSQL(stringa)
stringa = Replace(stringa, "'", "''")
stringa = Replace(stringa, "%", "[%]")
stringa = Replace(stringa, "[", "[[]")
stringa = Replace(stringa, "]", "[]]")
stringa = Replace(stringa, "_", "[_]")
stringa = Replace(stringa, "#", "[#]")
FixSQL = stringa
End function


adesso su ogni input box che voglio proteggere aggiungo la fixsql è funziona perfettamente, sono anche in grado di registrare chi ha scritto cosa, e salvare anche l'ip sul DB.

grazie a tutti per l'aiuto, adesso vado a cimentarmi con la funzione di ricerca