ignorar acentos

[dieguicho]

saben como puedo sacarles los acentos a todo?
ej..

palabra ="cactus"
y el select
consulta ="SELECT* FROM tabla where campo like '%" & palabra& "%'"

pero el tema es que si en la bd tengo cáctus y no cactus
no me lo encuentra.. la idea seria sacarle los acentos a lo que esta almacenado en la base
pero solo para la consulta. no modificarlo realmente
espero que se pueda..
saludos!!!!

[Myakire]

Bueno, no es muy elegante, pero funciona:
SELECT *
FROM tabla
WHERE (REPLACE(palclave, 'á', 'a') = palabra) OR
(REPLACE(palclave, 'é', 'e') = palabra) OR
(REPLACE(palclave, 'í', 'i') = palabra) OR
(REPLACE(palclave, 'ó', 'o') = palabra) OR
(REPLACE(palclave, 'ú', 'u') = palabra)

Saludos

[AlZuwaga]

Otra solución que al menos con BD's access funciona:

Código:

Function AccIns(Str)
Dim CurLtr
For x = 1 To Len(Str)
CurLtr = Mid(Str, x, 1)
Select Case CurLtr

Case "a", "à", "á"
AccIns = AccIns & "[aàá]"

Case "e", "é", "è"
AccIns = AccIns & "[eéè]"

Case "i", "ì", "í"
AccIns = AccIns & "[iìí]"

Case "o", "ò", "ó"
AccIns = AccIns & "[oòó]"

Case "u", "ù", "ú"
AccIns = AccIns & "[uùú]"

Case "n", "ñ", "Ñ"
AccIns = AccIns & "[nñÑ]"

'etc etc

Case Else
AccIns = AccIns & CurLtr
End Select
Next
End Function

criterio = request.form("el_text")
SQL = "SELECT * FROM tabla WHERE campo Like '%" & AccIns(criterio) & "%'"

[dieguicho]

excelente si funcionó muchas gracias.

[cytnightwolf]

que pasa en el caso que la palabra que busco la escribo sin acentos y en la base esta con acentos. los codigos arriba listados no funcionan. solo lo hacen en caso de que busco con acentos y en la base esta sin el mismo.

[AlZuwaga]

no, funciona igual. Comprobado.