Automation Access : processus persistant après Access.DBEngine.CreateDatabase
Bonjour la communauté,
j'avais un problème de processus persistant lors d'une automation sur Accès, alors j'ai désactivé les commandes une par une pour voir laquelle causait l'erreur et voilà ce que j'ai :
Code:
1 2 3 4 5 6 7 8
| Dim AccApp As Access.Application
AccApp = CreateObject("Access.Application")
With AccApp
.Visible = True
'If Not Exists(Dossier_Destination & "\Article.accdb") Then .DBEngine.CreateDatabase(Dossier_Destination & "\Article.accdb", dbLangGeneral) ' Création de la BDD de travail
.Quit()
End With
AccApp = Nothing |
Après la commande, Impossible de fermer Access, car dès que la fenêtre se ferme, elle se réouvre automatiquement (même si je clique moi même pour la fermer.)
Je suis obligé de kill le process.
Je dois certainement mal libérer quelque chose mais quoi ?... je ne sais pas.
Merci d'avance pour vos lumières !