Question : VBA pour ouvrir une base de données d'accès de l'intérieur d'un autre DB d'accès.

Pas sure pourquoi le code ci-dessous ne fonctionne pas.  J'ai l'intention d'ouvrir une base de données d'accès avec le « strDS », mais n'ai pas été réussi.  Mon chemin de serveur (//myserver1/Database.accdb) est énuméré sur [la commande de txtTarget] d'une autre forme.  La base de données s'ouvre, mais d'autre part se ferme immédiatement.  idées du

Any quant à ce que je fais mal ?  En outre, je suis ouvert de toutes les manières alternatives d'aller à ce sujet qui sont meilleures que ce que je fais maintenant.  Merci ! class= " lineNumbers " >

1 de >

cmdNo_Click secondaire privé ()
Faible objACC en tant que nouvel Access.Application
Faible strDSF comme corde
strDSF = [formes] ! [frmMain] ! [txtTarget]


Placer l'objACC = le GetObject (le strDSF)
Placer l'objACC = rien

Finir le sous-marin
class= >
 " clair " de 

  
  class= de 

Réponse : VBA pour ouvrir une base de données d'accès de l'intérieur d'un autre DB d'accès.

examiner ceci

1 : 2 : 3 : 4 : 5 : 6 : 7 : 8 : 9 : 10 : 11 : 12 : 13 : 14 :

cmdNo_Click secondaire privé () Faible accObj en tant que nouvel Access.Application Faible strDSF comme corde strDSF = [formes] ! [frmMain] ! [txtTarget] Avec l'accObj strDSF de .OpenCurrentDatabase . Évident = rectifier .UserControl = rectifient Extrémité avec Placer l'accObj = rien Finir le sous-marin