Foros del Web - VB MySQL = RecordCount=-1 ??????

Saludos compañeros:

Tengo un problema al realizar consultas a una base de datos MySql.

* Esta abriendo de forma correcta la base de datos
* Puedo hacer inserciones con el conexion.execute

Pero cuando hago un select sobre un recordset tenga o no tenga registros, la propiedad RecordCount me regresa siempre "-1", pero si me voy revisando el recordset con Rs.Fields(0).value SI me regresa los contenidos.

Les pongo el código que estoy utilizando, porque no se que sea lo que este ejecutando mal, en una base access funciona bien, pero al conectarme a MySql ya no.

-------------------------------------------------

Código:

Dim Conn As New ADODB.Connection

Dim Rs As New ADODB.Recordset
 

Sub main()
 

Conn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost;PORT=3306;DATABASE=mexico;USER=root;PASSWORD=contra;OPTION=3;"
 

Conn.Open

  

    With Rs

        .ActiveConnection = Conn

        .CursorType = adOpenStatic

        .LockType = adLockReadOnly

        .Open "Select * from nueva"  '(Nueva es mi tabla)

    End With
 

MsgBox Rs.RecordCount 'El recordcount siempre me regresa -1 tenga o no registros
 
 

End Sub