Connexio bd acces 2000 con control ADO

catacrack
14 de Julio del 2005
Hola. Me intento conectar a una bd acces 2000 però cuando hago open me sale error: no es un nombre de archivo vàlido.

el codigo:
Dim con As ADODB.Connection
Dim cadena As String

Set con = New ADODB.Connection
cadena = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "C:bdp5.mdb"

con.Open cadena

A ver si me podeis ayudar

Faviola
14 de Julio del 2005
Hola!!

Al parecer el problema es
Data Source=" & App.Path & "C:bdp5.mdb"

El App.Pactch identifica el directorio en el cuál está la aplicación. Si colocas la BD en el mismo directorio de la aplicación seria asi

Data Source=" & App.Path & "bdp5.mdb"

Espero te sirva.