Foros del web, para los que viven de bits

tengo la siguiente conexion

dim cn As ADODB.Connection
Dim rs As New ADODB.Recordset
Private Sub Form_Load()
Set cn = New ADODB.Connection
cn.ConnectionString = "DRIVER={MySQL ODBC 3.23 Driver};" _
& "SERVER=127.0.0.1;" _
& " DATABASE=basedato;" _
& "UID=root;PWD=; OPTION=3"
cn.CursorLocation = adUseClient
cn.Open

pero me manda el siguiente error

error '2147467259(800004005)'en tiempo de ejecucion
[Microsoft][administrador de controladores odbc]No se encuentra
el nombre del origen de datos y no se especifico ningun controlador
predeterminado

cambiale esta parte
"DRIVER={MySQL ODBC 3.23 Driver};" _

por la del "DRIVER={MySQL ODBC 3.51 Driver};"

el numero depende del driver que instalaste..

nos vemos..