Cuestión : Acceso 2010: ¿Puedo comenzar un ACCDE en modo runtime y suministrarlo es contraseña?

Necesito crear un atajo o el archivo del palo o el código o algo del vba que comienzan un and

o del acceso 2010 ACCDE se asegura de que funcione en modo runtime incluso si la versión al por menor del acceso lo está funcionando en los mismos pasos del machine
o es contraseña a ella de modo que el usuario no necesite incorporar un password

I saben hacer cualquiera o, pero no ambos.  Ver los recortes en el código below.

 class= > " claro " del
> del " codeSnippet " del class= del
class= " lineNumbers " del
class= del 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
los >This notpretty " del class= " del id= " codeSnippet829304 del
class= del

Respuesta : Acceso 2010: ¿Puedo comenzar un ACCDE en modo runtime y suministrarlo es contraseña?

Esto es un problema divertido. Usted puede automatizar una sesión normal del acceso, y usted puede abrir un uso en modo runtime… ¿Por qué no automatizar el uso runtime una vez que está abierto?

Usted puede comenzar abriendo, en modo runtime, una base de datos vacía simulada. Entonces asir la manija de la automatización a ese uso, y cambiar la base de datos actual a su uso protegido. El código abajo fue probado en el acceso 2003, así que puede ser que no trabaje en su versión. Es el módulo entero de la sola forma de lanzamiento de base de datos de a (tercero); usted puede hacer algo mejor en una lengua compilada (proteger la contraseña).

(°v°)
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:

Form_Load secundario privado ()

    strCmd dévil como secuencia
    accRT dévil como Access.Application

    strCmd = """" y _ de /runtime del "" de SysCmd (acSysCmdAccessDir) y “de MSACCESS.exe”
        y “d:\test\dummy.mdb”
    strCmd de Shell, vbNormalFocus
    Fijar el accRT = GetObject (“d:\test\dummy.mdb ")
    accRT.CloseCurrentDatabase
    accRT.OpenCurrentDatabase “D:\test\protected.mdb”, “zorglub”
    Application.Quit

Submarino del extremo
Otras soluciones  
 
programming4us programming4us