hola mira yo no lo trabajo con rdo.
sino con ado
Código:
Dim db As Connection
Dim adoPrimaryRS As Recordset
Set db = New Connection
Set adoPrimaryRS = New Recordset
db.CursorLocation = adUseClient
db.Open "DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost;DATABASE=nombre;PWD=passw ord;UID=usuario;OPTION=3"
de esta manera, podrías intentar asi para mi es la mejor forma de hacerlo..