Visual Basci y base de datos problema.

[andrea55]

Hola!, tengo la siguiente funcion para saber si la cedula ingresada de un usuario nuevo ya esta ingresada en la base de datos:

Código:

Public Function ExisteCI(ByVal inCI As Double) As Boolean
            Dim unaC As OleDbConnection = Me.Conectar()
            Dim adapter As OleDbDataAdapter = New OleDbDataAdapter("SELECT Cedula FROM Personal WHERE Cedula=" & inCI, unaC)
            Dim unDS As DataSet = New DataSet
            adapter.Fill(unDS, "Personal")
            unaC.Close()
            If unDS.Tables(0).Rows.Count > 0 Then
                Return True
            Else
                Return False
            End If
        End Function

El tema es que me señana esta parte del texto: adapter.Fill(unDS, "Personal") y me dice "No coinciden los tipos de datos en la expresión de criterios".

Alguien sabe porque es?

[rahd_rr]

hola...

mm creo falta un parametro (DataSet, RecordSet , nombre_tabla)fíjate que los parámetros sean correctos y del mismo tipo....mmmm los parentesis creo no van....

adapter.Fill unDS, "Personal"

le pones paréntesis cuando el resultado o lo que te devuelve la función lo asigna a una variable....

varX = adapter.Fill(unDS, "Personal")

saludos.. contar me como te fue...

... rahd RR