Funzione Replace

[bigdaniel]

Ho provato questa ultima funzione, ma mi da l'errore "Tipo non corrispondente: 'IllegalChars'" alla riga dove è presente:

blnIsIllegalCode = IllegalChars (Request.QueryString)

stessa cosa se:

blnIsIllegalCode = IllegalChars (Request.Form)

Qualche suggerimento, please?

[Vincent.Zeno]

  'IllegalChars funzione di guardia contro SQL injection
 Function IllegalChars(sInput)
 'Dichiara le variabili
  Dim iCounter, SBadChars
 'Set IllegalChars a False
 IllegalChars = False
 'Crea un array di caratteri illegali e parole
 sBadChars = array ("select", "drop", ",", "-", "isert", "delete", "xp_", "_", "#", "%", "&", "'", "(", ")", "/", "\", ":", ",", "<", ">", "= "," [","] "," "," `", "|?",  "__ ")
 'Loop attraverso sBadChars array utilizzando il nostro contatore e funzione UBound
For iCounter = 0 to UBound (sBadChars)
 'Usare funzione InStr per verificare la presenza di carattere illegale nella nostra variabile
 If Instr (sInput, sBadChars (iCounter))> 0 Then
 IllegalChars = True
 End If
 Next
 End Function

che poi richiamo ad inizio pagina in questo modo:

   blnIsIllegalCode = IllegalChars (Request.QueryString)

 If (blnIsIllegalCode) Then
    Response.Write ("Bad Request")
    Response.End ()
 End If

Ho provato questa ultima funzione, ma mi da l'errore "Tipo non corrispondente: 'IllegalChars'" alla riga dove è presente:

blnIsIllegalCode = IllegalChars (Request.QueryString)

stessa cosa se:

blnIsIllegalCode = IllegalChars (Request.Form)

Qualche suggerimento, please?

l'ho appena provata e non mi da errori, però specificando la variabile da controllare:
blnIsIllegalCode = IllegalChars (Request.Form("campodacontrollare"))
altrimenti restituisce sempre true

[bigdaniel]

Grazie, così è perfetto