funcion para evitar sql injection

[KenMasters]

alguna función hecha en Vb6 para poder evitar sql injection en mysql. he revisado en la web y encontré una función pero para php .

Código PHP:

  function limpiarcampo($dirty){
if (get_magic_quotes_gpc()) {
$liberate = mysql_real_escape_string(stripslashes($dirty));
}else{
$liberate = mysql_real_escape_string($dirty);
}
return $liberate;
} 
   

[JonathanB]

Saludos, puedes usar los parámetros en ADO para poder evitar sql injection.

Puedes tomar como referencia los siguientes enlaces:
http://stackoverflow.com/a/5378416
http://www.vbforums.com/showthread.p...meters-Example

[KenMasters]

encontre este link pero

http://www.canalvisualbasic.net/foro...ion-sql-19175/

igual no logro adaptador para VB6

alguna sugerencia,

yo uso las funciones de la siguiente manera :

Código:

Set rs = New Recordset
rs.Open "SELECT username FROM usuarios WHERE username='" & txtUserName.Text & "' AND PASSWORD=(SELECT MD5('" & txtPassword.Text & "'))", cn, adOpenDynamic, adLockOptimistic
   If rs.RecordCount <> 0 Then

también encontré este link la función me parece practica pero falta modificara para VB6, alguna sugerencia.

http://www.dotnetpuebla.com/portal/P...culos/848.aspx

[silver_axe007]

Hola AMigo.. Bueno es facil . yo que haria... enviaria un codigo tipo token en un parametro de seguridad.... es decir algo que solo la aplicacion sabe... si el codigo es correcto ejecuto el Query , caso contrario si ese caracter o token no viene... pos no lo ejecuto .. saludos