RESPUESTA A LA PREGUNTA 11149 - VISUAL BASIC


Hola 
cuando asignaste la seguridad a Access debes haberle especificado a que archivo de grupos de usuario (.mdw) te ibas a conectar o quizas creaste uno nuevo. 
Por lo que me doy cuenta esto no lo conoces, en caso de que tu hayas asignado la seguridad creo que debes revisar si la base de datos está realmente segura, ten en cuenta: 
Que el usuario Admin (o administrador) no tenga acceso a la base de datos, en caso contrario tu base de datos no está asegurada. 

Para poder accesar tu base de datos es necesario conocer donde esta este archivo (.mdw). 

suponiendo que se llama system.mdw y que está en el mismo directorio de la base de datos, además que tu aplicativo hecho en vb5 está en el mismo directorio .. debes hacer lo siguiente: 

1: Creas un formulario de inicio de sección donde pida el usuario y la contraseña 
2. 
Crea la conexión a la base de datos de la siguiente manera 

Public db as database 
Public wrk as workspace 
Public sDataBaseName as String 
... 

El siguiente codigo lo puedes crear entre un manejador de error y capturar el error cuando la clave es incorrecta 

sDataBaseName = app.path & "\mybasededatos.mdb" 

DBEngine.SystemDB = App.Path & "\system.mdw" 
'Set wrk = DBEngine.CreateWorkspace("STM", txtUserName, txtPassword) 

Set db = wrk.OpenDatabase(sDataBaseName) 


Simpre que necesites conectarte a la base de datos usa la variable db. 

Ahora si manejas datacontrols, es muy sencillo: Quitale en las propiedades la conexión a la base de datos 
en el evento load del formulario que lo contiene crea un recordset con el sql del datacontrol 
Dim Rs as recordset 
dim sSQL as string 'Contiene el sql que deseamos ejecutar 
.. 

set Rs = db.openrecordset(sSQL) 

'Asignale este recordset al recordset del datacontrol 

Set datacontrol.recordset = Rs 

set rs = nothing 

Recuerda que la variable db la creaste en el formulario de incio de sección, y la vas a usar mientras necesites conectarte a la base de datos, cuando finalices el programa no olvides destruir estas varibles publicas 

Espero esto te sirva, si tienes dudas puedes escribirme 


Luis Fernando Melo
fdomelo@hotmail.com