jeanette
03 de Abril del 2003

hOLA AMIGOS DEL FORO SABEn TENGO UN SUPER PROBLEMA ESTOY TRATANDO DE MANIPULAR DATOS DE UNA BASE DE DATOS ACCES CON SENTENCIAS SQL Y ADO PERO QUIERO BUSCAR UN REGISTRO DE UNA TABLA POR ID Y ME SALE UN ERROR HAGO LO SGTE PARA QUE SE CUMPLA MI CONDICION que el campo rut_clie sea igual al rut ingreasado en la caja de texto txtrut

Set db = New ADODB.Connection
Set rs2= New ADODB.Recordset

sql = "select * from cliente WHERE rut_clie =' '" & txtrut & " ' "

RS.OPEN SQL , db

este es el error que me aparece
"NO COINCIDEN LOS TIPOS DE DATOS EN LA EXPRESION DE CRITERIOS"
que creen que hago mal?
byee

Sixto Jose Romero Martinez
03 de Abril del 2003

Set db = New ADODB.Connection
Set rs2= New ADODB.Recordset

sql = "select * from cliente WHERE rut_clie =' '" & txtrut & " ' "

RS.OPEN SQL , db
te sale el error porque debes poner la conexion del recorset y connection asi

Set db = New ADODB.Connection
Set rs2= New ADODB.Recordset

sql = "select * from cliente WHERE rut_clie =' '" & txtrut & " ' "

RS.OPEN SQL , db,2,3
If rs2.BOF or rs2.EOF Then
MsgBox "No tiene Datos?", vbCritical + vbQuestion, "Vacío"
Else
LeerDatos
End If

leerdatos es un procedimiento sub donde tienes que conectar los text a cada campo de la tabla de la base de datos

Santos Pairazam?
03 de Abril del 2003

sql = "select * from cliente WHERE rut_clie =
'"& txtruct &"'"

javierbalk
03 de Abril del 2003

Hola:

Si rut_clie es un dato numérico, entonces no le pongas las comillas simples.

sql = "select * from cliente WHERE rut_clie = " & txtrut

Javier