ERROR '-2147217913 (80040E07)' en tiempo de ejecucion: no coinciden los tipos....

[juancho24]

Hola amigos del foro

necesito urgente que alguien me ayude con un error que tengo en mi codigo de visual y no logro entender a que se debe, aqui les dejo el codigo para que porfavor me ayuden y me digan a que se debe:

ERROR '-2147217913 (80040E07)' en tiempo de ejecucion: no coinciden los tipos de datos en la expresion de criterio

Private Sub Asignar_Datos()


rutclienteingreso = txtRutCliente.Text
dvclienteingreso = txtdvcliente.Text

rs.Open "select * from datoscliente where rutcliente = '" & txtRutCliente.Text & "'", cnn, adOpenKeyset, adLockOptimistic
If rs.BOF = True And rs.EOF = True Then
rs.AddNew
rs("RutCliente") = txtRutCliente.Text
rs("DvCliente") = txtdvcliente.Text
rs("NombreCliente") = txtNombreCliente.Text
rs("DireccionCliente") = txtDireccionCliente.Text
rs("FonoCliente") = txtTelefonoCliente.Text
rs("CorreoCliente") = txtCorreoCliente.Text
Else
rs.MoveFirst
If rs("rutcliente") = txtRutCliente.Text Then
MsgBox ("Rut de cliente ingresado ya existe"), vbInformation
rs.MoveNext
Else
rs.AddNew
rs("RutCliente") = txtRutCliente.Text
rs("DvCliente") = txtdvcliente.Text
rs("NombreCliente") = txtNombreCliente.Text
rs("DireccionCliente") = txtDireccionCliente.Text
rs("FonoCliente") = txtTelefonoCliente.Text
rs("CorreoCliente") = txtCorreoCliente.Text
End If


End If

gracias saludos

[Kelpie]

¿Cuál es el tipo de datos de 'rutcliente'?
¿Qué contiene el textbox 'txtRutCliente'?

[Tera_Byte]

Debemos recordar que El valor de TxtRutCliente es un string.... y de seguro que RutCliente es de tipo numerico...... lo que debes hacer es convertir el valor de txtRutCliente.text a valor mnumerico y listo... (ESPERO NO ESTAR EQUIVOCADO)

[juancho24]

exacto, el problema era en el tipo de datos que tenian tanto el textbox como el campo, asi que lo que hize fue en el select refernecie el valor (val) de lo que contiene el textbox para que no me tomara el valor incluyendo las comillas simples(') y solucionado

bye gracias por la ayuda