SoloCodigo

hola que tal amigos..

tengo la siguiente consulta:
Dim reco1 As Recordset
dim num as integer
num=1
Set reco1 = a.OpenRecordset("select * from Status where nun_hab = '" + num + "'" )
           If reco1.RecordCount > 0 Then
                            reco1.Edit
                            reco1!Status = 2
                            reco1.Update
            End If
en la tabla status, el campo "nun_hab" es de tipo numerico-integer,alli tengo solo dos campos el nun_hab y el status, pero cuando hago esta consulta me devuelve un error diciendo que "No coinciden los tipos de datos"

lo que quiero es cambiar el valor de status donde el campo nun_hab sea igual a 1.
echenle un ojo a ver que será?

Carlos ya habia probado de esa forma y me da el siguiente error:


Data type mismatch in criteria expression:gracias:

Bien... mira, el problema es el siguiente, si como dices "el campo 'nun_hab' es de tipo numerico-integer", pues la sintaxis de la consulta es incorrecta...

Como a simple vista no se ve pues copie el codigo de colsulta SQL y mire que le pones comillas simples... pues el problema es que no lleva comillas simples ya que el campo es de tipo numerico y no cadena...

Entonces tu codigo quedaria algo asi:

 
Suerte...