El nombre del origen de datos es demasiado largo

Hola estoy trabajando en un proyecto con Visual Basic 6.0 y una base de datos con access 2010.

Código con Visual Basic:

Dentro de un modulo:

Option Explicit
Public cnnAdodb asNew ADODB.Connection

Public Sub Conexion()
cnnAdodb.Provider= "MSDASQL.1"
cnnAdodb.Open (App.Path & "\BBDD\MiBBDD.mdb")
End Sub

Dentro del Form Load()
Call Conexión.
Ejecuto el programa desde Visual Basic y me aparece el siguiente error:

Error '-2147467259 (80004005)'
[Microsoft][Administrador de controladores ODBC] El nombre del origen de datos es demasiado largo.

Me podéis indicar a que es debido y como solucionarlo.

Muchas Gracias.

Saludos.