Io per i miei login ho sviluppato uno script da lanciare prima di aprire il DB e di lanciare l'eventuale query.
codice:
Function Controllo(testo)
'*********************
if UCASE(testo) = "OR" then desc = "Sbagliato"
if UCASE(testo) = "AND" then desc = "Sbagliato"
if UCASE(testo) = "LIKE" then desc = "Sbagliato"
set re = new RegExp
re.Pattern = "['\-\=\?\&\*\$\.\;\!\<\>\%]"
if re.Test(var) then Desc = "Sbagliato"
End Function
Questa, invece, è la versione precendente:
codice:
Function Controllo(testo)
'*********************
testo= replace(testo, "'", " ")
testo= replace(testo, "-", " ")
testo= replace(testo, "=", " ")
testo= replace(testo, "?", " ")
testo= replace(testo, "&", " ")
testo= replace(testo, "*", " ")
testo= replace(testo, "$", " ")
testo= replace(testo, ".", " ")
testo= replace(testo, ";", " ")
testo= replace(testo, "!", " ")
testo= replace(testo, ">", " ")
testo= replace(testo, "<", " ")
End Function
Spero ti possa essere d'aiuto