bonjour,

j'ai créé la 1ère application A.MDB qui appelle la 2è B.MDB. Tout fonctionne sur mon PC. je les compile en MDE. Tout fonctionne avec le code ci-dessous.
Cependant ils fonctionne seulement sur un PC avec la version full Access. sur un PC avec runtime, il ne fonctionne pas.

Avez-vs déjà travaillé sur ce point ? merci pour votre aide.


ci-dessous le sub dans la A.MDE.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Sub test() 
 
On Error GoTo Error_Handler 
 
    Dim AppMSAccess As Access.Application 
    Set AppMSAccess = New Access.Application 
 
    AppMSAccess.Visible = True 
    AppMSAccess.OpenCurrentDatabase ("C:\IT_EF\B.mde") 
 
Error_Handler: 
 
    If Err.Number = 7866 Then 
        AppMSAccess.Visible = False 
        MsgBox "Le chemin de l'application n'est pas correct." 
    End If 
    Exit Sub 
 
End Sub