conexion a BD Acces - VB-MUNDO

chlsaul · #1 (**permalink**) 19-01-2005, 14:42:26

Hola..
Tengo una BD a la que deseo conectarme usando ADO, pero esta BD esta protegida por su contraseña, Se la contraseña, pero no se como abrir la BD..
Use este codigo.

Código:

Private cn As ADODB.Connection
Set cn = New ADODB.Connection
cn.Open "Provider=Microsoft.Jet.OLEDB.4.1;DataSource=MyBD;Jet OLEDBDataBase Password=MyPass"

Y me sale error... ke no se instalo el ISAM o algo asi
Cual seria el Problema.
Otra cosita Puedo Asignar una Conraseña a la BD desde el Administrador Visual de Datos del VB ??

imported_HurryCrack · #2 (**permalink**) 19-01-2005, 19:39:50

Hola amigo, creo que ese error te está dando por que estas utilizando un ISAM que no corresponde con tu versión de Access.
Esto es, si tienes access 2000 o posterior usa el JET 3.51, JET 4.0 ó JET 4.1. Si tienes Access 9x utiliza el JET 3.50.

No se si esta información es exacta, seguro que alguien me corrige alguna versión o algo, yo no lo recuerdo con exactitud. Un saludo.

arodriguezp · #3 (**permalink**) 19-01-2005, 21:06:17

Amigo, yo tambien tengo un proyecto abriendo una base de datos de Access 2000 protegida con contraseña, el codigo que utilizo es el siguiente:
Set BASE = New ADODB.Connection
Set Personas = New ADODB.Recordset
BASE.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & "C:\mibase.mdb" & ";Persist Security Info=False;Jet OLEDB

atabase Password=alexander;Jet OLEDB:New Database Password=alexander"
Personas.Open "SELECT * FROM procesos", BASE, adOpenDynamic, adLockOptimistic

Aqui la base de datos es mibase.mdb y la contraseña es alexander, luego para hacer manipulación de datos utilizo lo siguiente:

Text1.Text = Personas.Fields!identificacion
donde iddentificacion es un campo de la base, o asignandolo a una variable:

var_nombre=Personas.Fields!nombre

Espero que esta informacion te sirva de algo.

chlsaul · #4 (**permalink**) 19-01-2005, 22:13:40

Solucionado el Problema Amigos, Muchas Gracias a ambos