VB MySQL = RecordCount=-1 ??????

[aavg]

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

[reel]

Prueba poniendo esto:

.CursorLocation = adUseClient

Saludes

[aavg]

Muchas gracias Reel... ese era el problema

Thanx man... (y)