Metodę, opartą na nieudokumentowanym wywołaniu funkcji SysCmd, podał Zbigniew Bratko (brazby@poczta.onet.pl).
Application.SysCmd 603, sPathMdb, sPathMde
Dim accApp As Access.Application Set accApp = New Access.Application accApp.SysCmd 603, sPathMdb, sPathMde Set accApp = Nothing
Uzupełnienie:
Krzysztof Naworyta:
A oto kilka innych, nieudokumentowanych wywołań funkcji SysCmd przygotowanych przez autora tej strony.
I jeszcze kilka , podanych przez Krzysztofa Naworytę.