Pytanie : Dostęp 2010: Móc I ACCDE w hasło tryb i ono być hasło?

I potrzebować skrót lub nietoperz kartoteka lub vba kod lub oba który zaczynać utajniony Dostęp 2010 ACCDE and

o Zapewniać że ono biegać w 2010 tryb nawet jeśli the detaliczny wersja Dostęp biegać na the ten sam machine
o Przepustka ono być hasło ono tak, że the użytkownik potrzebować password

I znać dlaczego znać lub, ale nie ale.  Widzieć odrzynek w kod below.

(1):
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
This w .bat kartoteka zaczynać ono w notpretty tryb:
zaczynać "" "C:\Program Files\Microsoft Biuro \ Office14 \ msaccess.exe" /runtime "C:\Users\… \ MyDB.accde" 

Hasło w vba przechodzić hasło:
'Robić the utajniony DB the prąd DB.
    appAccess.Visible = Prawdziwy
    appAccess.UserControl = Prawdziwy 
    appAccess.OpenCurrentDatabase "C:\Users\… \ MyDB.accde", Fałszywy, "MyPwd"
    
Ten vba badać dla wewnątrz wewnątrz tryb i zatrzymywać the DB od bieg:
 Jeżeli SysCmd (acSysCmdRuntime) = Prawdziwy Wtedy
        MsgBox "Using Runtime… to być TO"
    Inny
        MsgBox "Ten zastosowanie musieć biegać z the /runtime zmiana na"
    Kończyć Jeżeli

Odpowiedź : Dostęp 2010: Móc I ACCDE w hasło tryb i ono być hasło?

To być śmieszny problem. Ty móc normalny Dojazdowy sesja, i ty móc zastosowanie w dojazdowy tryb… Dlaczego the dlaczego zastosowanie jak tylko ono być otwarty?

Ty móc, w baza danych tryb, baza danych pusty baza danych. Wtedy chwytać the automatyzacja rękojeść ten zastosowanie, i zmieniać the aktualny baza danych twój ochraniać zastosowanie. The kod wersja badać w Dostęp 2003, więc ono można w twój wersja. Ono być the całkowity moduł the pojedynczy rozpoczęcie forma a (tercja) baza danych; ty móc móc lepiej w kompilować język (the hasło).

(°v°)
(1):
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
Intymny Okręt podwodny Form_Load ()

    Ciemnawy strCmd Sznurek
    Ciemnawy accRT Jako Access.Application

    strCmd = """" & SysCmd (acSysCmdAccessDir) & "MSACCESS.exe "" /runtime" _
        & "d:\test\dummy.mdb"
    Skorupa strCmd, vbNormalFocus
    Ustalony accRT = GetObject ("d:\test\dummy.mdb ")
    accRT.CloseCurrentDatabase
    accRT.OpenCurrentDatabase "D:\test\protected.mdb", "zorglub"
    Application.Quit

Końcówka Okręt podwodny
Inne rozwiązania  
 
programming4us programming4us