Programación General > Visual Basic 6.0 e inferiores

 Re: Como abrir una base de datos access 97 con clave

(1/1)

Mark:
Me gustaria saber como tengo que hacer para abrir una base de datos MDB de access 97 con clave desde vb. Gracias.

José D:
Mira a ver si esto te sirve, lo tengo en cuenta pero no he hecho una BD con clave, es algo que lei en otro foro y que simplemente te pongo aquí:

Perteneciente a AMB Software
 
--- Citar ---Vamos a suponer que la base de datos se llama Bd1.mdb.
Genere una contraseña para la nueva base de datos creada.

Para este ejemplo, he creado la contraseña "Amb".
Tenga cuidado con las mayúsculas y minúsculas, ya que Access hace distinción entre ellas.

Se ha dispuesto para este ejemplo las siguientes propiedades de tabla:

Nombre de la tabla: Tabla1

Nombre del Campo Tipo de datos Tamaño:
Nombre Carácter 50
Apellido1 Carácter 50
Apellido2 Carácter 50
Edad Numérico Entero

Ejemplo:

Añada 4 cajas de texto y un control Data al formulario, el cual por defecto llevará el nombre de Data1.
Cambie la propiedad DataSource de todas las cajas de texto a Data1.
A continuación escriba el siguiente código.

Private Sub Form_Load()
Data1.DatabaseName = "C:TempBd1.mdb"
Data1.RecordSource = "Tabla1"
Data1.Connect = ";pwd=Amb"
Text1.DataField = "Nombre"
Text2.DataField = "Apellido1"
Text3.DataField = "Apellido1"
Text4.DataField = "Edad"
End Sub

--- Fin de la cita ---


 
--- Citar ---
Otra opción

Dim strconnect As String

strconnect = ";database=ruta donde esta base de datos " & _
";pwd=" & "clave"
Set db = OpenDatabase("", True, False, strconnect)

--- Fin de la cita ---


En todo caso esperemos que aparezcan soluciones más certeras.

Saludos.

Navegación

[0] Índice de Mensajes