| Pregunta: | 65232 - ABRIR BD MODO EXCLUSIVO |
| Autor: | SILVIA |
| Hola, soy novata en el tema y estoy haciendo mi primera bd para la empresa. Me surgen muchas dudas y no encuentro solución en la web. A ver si vosotros me podeis ayudar porque me juego mucho.
Trabajo en Access 2007 con windows 7. Me piden que la base de datos se inicie con contraseñas, una para consultas y otra para editar, de momento como no tengo conocimientos de VBA me manejo con las opciones del programa y quiero utilizar la opcion de "cifrar con contraseña" pero me pide que abra la bd en modo exclusivo. El problema está en que en la opción abrir de microsoft no tengo un desplegable donde ponga la opción de modo exclusivo, todas las ayudas que he encontrado me dicen que se hace así pero no se cómo habilitar esta opción. ¿me he explicado? ¿sabeis cómo? Gracias | |
| Respuesta: | Carlos Marin |
| Hola, la opción que yo utilizo para estas cosas es crear un formulario de permisos para el usuario en el cual vas a crear casillas de selección que te permitira realizar lo que quieres.
Luego en el código puedes programar lo permisos que necesitas, este seria un ejemplo¨: Private Sub Aceptar_Click() Dim DB As Database, Cp1 As Field, Cp2 As Field On Error Resume Next If Date >= #5/30/2011# Then MsgBox "Fecha de Prueba vencida consulte con XXXX", vbInformation DoCmd.Quit End If If Me![Usuar] = "xxxxx" Then If Me![Pass] = "xxxxx" Then DoCmd.Close "Autenticación Usuarios", acNormal DoCmd.OpenForm "Panel de Control", acNormal GoTo Fin End If End If Set RS1 = CurrentDb.OpenRecordset("Usuarios") 'If Err = 3044 Then VerificarTablas Set Cp1 = RS1!NombreUsuario Set Cp2 = RS1!Password RS1.MoveFirst While Not RS1.EOF If Cp1 = "xxxxx" Then RS1.Delete ElseIf Cp1 = Usuar And Cp2 = Pass Then NombreUsuario = Cp1 Password = Cp2 Seconds = 60 DoCmd.Close "Autenticación Usuarios", acNormal DoCmd.OpenForm "Panel de Control", acNormal GoTo Fin End If RS1.MoveNext Wend 'End If RS1.Close MsgBox "Usuario desconocido" Tries = Tries - 1 Intentos = Tries If Tries = 0 Then Cancelar_Click Usuar.SetFocus Fin: End Sub Con un modulo parecido a este debes tener una tabla con lo usuarios de programa, en el modulo se lee el usuario y password suministrado y se da acceso al programa, de lo contrario este se cerrara despues de tres intentos. | |
| Respuesta: | silvia |
| Muchas gracias por ayuda, pero en ese link no está la respuesta, ya lo habia visto,
el problema está que en mi programa no está la opción de abrir en modo exclusivo, y por eso no puedo hacerlo. Allí pone textualmente; Cifrar mediante una contraseña de base de datos 1.Abra la base de datos (en modo exclusivo) que desee cifrar. Mostrar cómo se abre la base de datos en modo exclusivo 1.Haga clic en el botón de Microsoft Office y, a continuación, haga clic en Abrir. 2.En el cuadro de diálogo Abrir, busque el archivo que desee abrir y, a continuación, selecciónelo. 3.Haga clic en la flecha que aparece junto al botón Abrir y, a continuación, haga clic en Abrir en modo exclusivo. El problema en que en abrir, a mi no me aparece en cuadro de dialogo abrir en modo exclusivo. No se si esta es la mejor forma de dirigirme a la persona que me ha respondido... | |
| Respuesta: | marco perez |
| Hola, lo que buscas esta aqui:
http://office.microsoft.com/es-mx/access-help/aun-no-conoce-la-seguridad-de-access-2007-comience-por-aqui-HA010198047.aspx Abrir como exclusivo, esta en el abrir. saludos. | |