Visual Basic - PROBLEMA EN CONSULTA VB6.0 CONTRA BBDD ACCESS 2003

Life is soft - evento anual de software empresarial
   
Vista:

PROBLEMA EN CONSULTA VB6.0 CONTRA BBDD ACCESS 2003

Publicado por MIGUEL (7 intervenciones) el 29/01/2011 02:41:52
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.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

PROBLEMA EN CONSULTA VB6.0 CONTRA BBDD ACCESS 2003

Publicado por apacheco (63 intervenciones) el 16/06/2011 17:57:55
SE hace igual , solo que no debes poner comilla simple ni delante ni detras del campos de busqueda.

si txtCategoriaPadre es un entero

Set rsCategoriaPadre = db.OpenRecordset("Select * from CATEGORIAS_PADRE where CATEGORIA_PADRE=" & Clng(txtCategoriaPadre)) si txtCategoriaPadre es un DoubleSet rsCategoriaPadre = db.OpenRecordset("Select * from CATEGORIAS_PADRE where CATEGORIA_PADRE=" & Cdbl(txtCategoriaPadre))

Con Cdbl logras que si el campo txtCategoriaPadre tiene el valor 1.246,75 (con coma separadora de decimales que daria error en el query) se quedaria como 1246.75
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar