Hola,

tengo un problema muy extraño. Tengo un programa en Visual Basic 6
para acceder a una base de datos Access que está en su mismo
directorio. Para recoger, por ejemplo, el número de usuarios hago:

Dim midb As Database
Set midb = DBEngine.Workspaces(0).OpenDatabase(App.Path & "\datos.mdb")
Dim consulta As String
consulta = "SELECT * FROM Login"
Dim rs As Recordset
Set rs = midb.OpenRecordset(consulta, dbOpenDynaset)
'rs.MoveLast
'rs.MoveFirst
MsgBox rs.RecordCount

En esa tabla hay 3 filas. Pues bien, el rs.RecordCount me dice que
sólo hay 1. Pero si descomento el rs.MoveLast y el rs.MoveFirst, me
devuelve las 3.

¿A alguien le ha pasado algo parecido? ¿Sabéis qué puede estar
pasando? Hasta ahora siempre lo había usado así y siempre había
funcionado correctamente.

Muchas gracias de antemano.