Error: No se encuentra el origen de datos

[Improvisado]

Estoy programando en Visual Basic, con tipo de conección ADO y BD Access.
En mi maquina funciona bien pero cuando lo instalo en otra me da el siguiente error en tiempo de ejecucion y se corta: Administrador de control de datos ODBC . No se encuentra el nombre de origen de datos y no se especifico ningun controlador predeterminado.
La cadena de Conección es:
"DBQ=" & App.Path & "\BD\Datos.mdb;DefaultDir=" & App.Path & "\BD;Driver={Controlador para Microsoft Access (*.mdb)};DriverId=25;FIL=MS Access;FILEDSN=C:\Archivos de programa\Archivos comunes\ODBC\Data Sources\OrigenDatoAccess.dsn;MaxBufferSize=2048;Ma xScanRows=8;PageTimeout=5;PWD=;SafeTransactions=8; SystemDB=" & App.Path & "\BD\Seguridad.mdw;Threads=3;UID=Programa;UserComm itSync=Yes;"

Si alguien sabe como corregirlo, por favor que me lo indique o bien a que puede obedecer.
Gracias.

[pabli]

Improvisado,

la cadena de conexión que has puesto es enorme , no me he puesto a investigar si está bien o no, pero seguro que no.
Veo que estás metiendo un FILEDSN, no es necesario, pues le estás dando todos los datos necesarios en la cadena. Yo no utilizo DSN, en ninguna de las dos formas, pues sería necesario configurarlo en la máquina del cliente. Poco recomendable.

Te voy a dar un truco para crear cadenas de conexión:

-pones en un formulario un datacontrol de ADO
-botón derecho sobre el datacontrol y eliges "propiedades de ADODC"
-en la pestaña general eliges usar cadena de conexión y pulsas generar
-completas todos los datos que te piden tipo DSN y aceptas
-la cadena de conexión se habrá colocado en la pantalla propiedades anterior
-la copias y se la asignas a una variable cambiando ruta por app, usuario por variable de tu aplicación, etc, etc
-el ADODC lo borras

Espero que te sirva
Saludos
Pablo

[Improvisado]

Pabli:
Gracias. Es mas o menos lo que he hecho.
Pero como trabajo con una base Access, y con seguridad a nivel de usuario, cuando lo ejecuto me tira error ( no en mi pc).
La cadena la genero como decis, nada mas que con el entorno de datos.
Le voy a borrar el DSN y veo que pasa.
Si todo OK lo coloco en el foro.
Saludos.

[pabli]

Improvisado,

te pongo una cadena que funciona, para Access2000:

Gado_conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & S_ruta & "\bbdd.mdb;Persist Security Info=False"

Si tienes clave de acceso a la bbdd tienes un parámetro que puedes configurar al final de las pantallas del DSN que te hablé antes.

Saludos
Pablo

[Improvisado]

Pabli:
La probe en mi PC y funciona OK, la voy a llevar a otra y espero tener suerte.
Gracias por la ayuda.