Visual Basic - Consulta ODBC

Hola, es la primera vez q uso ODBC para bases de datos y tengo un problemilla con una consulta:
Creo la conexión del DNS, abro la base de datos, genero la cadena de consulta y cuando creo el recordset con la cadena de consulta, me genera el siguiente error en tiempo de ejecución:
Error '3001': Argumento no valido.
lo q hago es lo siguiente:

Vbes de la base de datos
Public wrkODBC As Workspace
Public dbsComunicaciones As Database
Public rdsetComunicaciones As Recordset

Abro la base

Set wrkODBC = CreateWorkspace("ODBCWorkspace", "", "", dbUseODBC)
Workspaces.Append wrkODBC

'*** Abre el objeto Database de sólo lectura escribiendo sólo la información que falta
' en el cuadro de diálogo Administrador del controlador ODBC.
Set dbsComunicaciones = wrkODBC.OpenDatabase("Comunicaciones", dbDriverComplete, _
True, "ODBC;DATABASE=db;DSN=Comunicaciones;")

Ejecuto la sentecia de busqueda

Set rdsetComunicaciones = dbsComunicaciones.OpenRecordset(strBusquedaSql, dbOpenSnapshot, dbSQLPassThrough)

Alguien puede decirme q he hecho mal.
Muchas gracias de antemano a todos.