| Pregunta: | 26097 - COMPARACIÓN SQL SIN DIFERENCIAR ACENTOS |
| Autor: | Javier Morales |
| Como puedo hacer para que mis sentencias sql del estilo
dim persona as string persona='Jimenez' set rs=miconexion.execute("Select * from personas where apellido=" & persona & '"',,adcmdtext) me devuelva sin diferenciar con acentos. | |
| Respuesta: | Vino Tinto |
| Puedes hacer una función... algo como esto:
Function ObviarAcentos(Cadena as string) as string Cadena = Replace(Cadena, "á", "[áa]") Cadena = Replace(Cadena, "é", "[ée]") Cadena = Replace(Cadena, "í", "[íi]") Cadena = Replace(Cadena, "ó", "[óo]") Cadena = Replace(Cadena, "ú", "[úu]") ObviarAcentos = Cadena end function Y tu consulta quedaría asi: rs.open "Select * from personas where apellido = '" & ObviarAcentos(persona) & "'", MiConexion Ojalá te sirva! | |