PROBLEMA EN CONSULTA VB6.0 CONTRA BBDD ACCESS 2003

29/01/2011 - 02:42 por Ironpony | Informe spam
Uso VB 6.0 con Access 2003, y hago esta consulta

Set rsCategoriaPadre = db.OpenRecordset("Select * from
CATEGORIAS_PADRE where CATEGORIA_PADRE='" & Trim(txtCategoriaPadre) &
"'")

Siendo CATEGORIA_PADRE un campo texto de 40 caracteres de la tabla
CATEGORIAS_PADRE y txtcategoriaspadre un texbox de tamaño máximo 40
caracteres

pues me da el error "13" de que no coinciden los tipos

¿como se puede solucionar?

si el campo a comparar es numérico en vez de texto ¿me pueden poner
algún ejemplo de como se haría?

muchas gracias.
 

Leer las respuestas

#1 Emilio
29/01/2011 - 07:58 | Informe spam
¡Importante!: Colabora con el grupo. Contesta a este mensaje
y dinos si te sirvió o no la respuesta dada. Muchas gracias
Hola!

si el campo fuera numérico sobrarían las comillas simples

Set rsCategoriaPadre = db.OpenRecordset("Select * from
CATEGORIAS_PADRE where CATEGORIA_PADRE=" & Trim(txtCategoriaPadre))

El problema de tipos puede ser debido a que estas utilizando DAO, pero
tienes referenciado ADO.

Saludos a todos
Emilio [MS-MVP Access 2006/11]
miliuco56 ALGARROBA hotmail.com
http://www.mvp-access.com/foro
http://www.mvp-access.es/emilio

"Ironpony" escribió en el mensaje de
noticias:

Uso VB 6.0 con Access 2003, y hago esta consulta

Set rsCategoriaPadre = db.OpenRecordset("Select * from
CATEGORIAS_PADRE where CATEGORIA_PADRE='" & Trim(txtCategoriaPadre) &
"'")

Siendo CATEGORIA_PADRE un campo texto de 40 caracteres de la tabla
CATEGORIAS_PADRE y txtcategoriaspadre un texbox de tamaño máximo 40
caracteres

pues me da el error "13" de que no coinciden los tipos

¿como se puede solucionar?

si el campo a comparar es numérico en vez de texto ¿me pueden poner
algún ejemplo de como se haría?

muchas gracias.

Preguntas similares