Discussion :

[Njara]

Bonjour,

Comment faire pour savoir par programmation qu'une table est liée à la base active.
Avec l'interface Access, il facile de connaitre qu'une table est liée en voyant la flèche devant sont icône.

Le code suivant renvoi toutes le tables de la base active. Tables système commençant par "MSys", Tables loacles et tables liées.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
For i = 0 To CurrentDb.TableDefs.Count - 1
    stNomTable = dbsCurrent.TableDefs(i).Name
     Debug.Print i & "-" & stNomTable
Next i

Notez que les tables ont toutes des noms commençant par tbl, et je ne peux donc utiliser l'instruction mid pour les conaitre.

Merci
Njara

[shwin]

tu peux utiliser ceci pour savoir quel table est lié à quelle Bd

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Dim strPath As String
strPath = CurrentDb.TableDefs("table1").Connect
MsgBox strPath

strpath va retourné qqechose du genre ";DATABASE=C:\mabase.mdb"
si la table est lié, sinon strpath est vide.

C:\mabase.mdb = ma base où sont stocké mes tables à lié

[cafeine]

la propriété .Connect d'une table liée est d'une longueur non nulle ...