OVH Cloud OVH Cloud

Lister les objets requêtes d'un fichier mdb

10 réponses
Avatar
Jean Marie VIGNEAUD
Bonjour,

Existe-til une fonction vba sous access 97, qui permettent de lister le
contenu, ici les requêtes, d'un fichier.mdb et des les afficher dans un
formulaire de type feuille de données??

Merci de votre aide.

Cordialement,

JMV

10 réponses

Avatar
Gafish
Bonjour

Utilise la table MSysObjects.
Fais par exemple une requête :

SELECT * FROM MSysObjects WHERE type=5;

et tu auras dans name le nom de toutes tes requêtes, à mettre ensuite en
source de ta liste.
Le type 5 filtre les requêtes, si tu enleves ce critères tu auras les autres
objets de ta base.

Arnaud

"Jean Marie VIGNEAUD" a écrit dans le
message news: cq97ho$kv8$
Bonjour,

Existe-til une fonction vba sous access 97, qui permettent de lister le
contenu, ici les requêtes, d'un fichier.mdb et des les afficher dans un
formulaire de type feuille de données??

Merci de votre aide.

Cordialement,

JMV




Avatar
Jean Marie VIGNEAUD
Super,

Une dernière petite question.
Comment appliquer cette requête si je veux connaître la liste des objets
d'un autre fichier .mdb.

Exemple:

Je suis dans Test.mdb et je veux connaître la liste des requêtes présentes
dans test1.mdb ??

Merci encore

"Gafish" a écrit dans le message de news:
e3J22$
Bonjour

Utilise la table MSysObjects.
Fais par exemple une requête :

SELECT * FROM MSysObjects WHERE type=5;

et tu auras dans name le nom de toutes tes requêtes, à mettre ensuite en
source de ta liste.
Le type 5 filtre les requêtes, si tu enleves ce critères tu auras les
autres

objets de ta base.

Arnaud

"Jean Marie VIGNEAUD" a écrit dans le
message news: cq97ho$kv8$
Bonjour,

Existe-til une fonction vba sous access 97, qui permettent de lister le
contenu, ici les requêtes, d'un fichier.mdb et des les afficher dans un
formulaire de type feuille de données??

Merci de votre aide.

Cordialement,

JMV








Avatar
Gafish
Le mieux en ce cas c'est de lier la table MSysObjects de test1.mdb dans ton
exemple.
Pour cela, il faut que tu affiches les tables systemes
(outils...options...onglet affichage, cocher tables systemes) et tu procèdes
comme pour lier une table.
Après tu appliques la requête ci-dessous pour lister les requêtes de test1

Arnaud

"Jean Marie VIGNEAUD" a écrit dans le
message news: cq98k1$lhm$
Super,

Une dernière petite question.
Comment appliquer cette requête si je veux connaître la liste des objets
d'un autre fichier .mdb.

Exemple:

Je suis dans Test.mdb et je veux connaître la liste des requêtes présentes
dans test1.mdb ??

Merci encore

"Gafish" a écrit dans le message de news:
e3J22$
Bonjour

Utilise la table MSysObjects.
Fais par exemple une requête :

SELECT * FROM MSysObjects WHERE type=5;

et tu auras dans name le nom de toutes tes requêtes, à mettre ensuite en
source de ta liste.
Le type 5 filtre les requêtes, si tu enleves ce critères tu auras les
autres

objets de ta base.

Arnaud

"Jean Marie VIGNEAUD" a écrit dans le
message news: cq97ho$kv8$
Bonjour,

Existe-til une fonction vba sous access 97, qui permettent de lister
le



contenu, ici les requêtes, d'un fichier.mdb et des les afficher dans
un



formulaire de type feuille de données??

Merci de votre aide.

Cordialement,

JMV












Avatar
Jean Marie VIGNEAUD
Le seul petit soucis est que la table MSysobjects existe déjà dans ma base
courantes et qu'il ne veut pas attacher celle de l'autre base.
... ?


"Gafish" a écrit dans le message de news:

Le mieux en ce cas c'est de lier la table MSysObjects de test1.mdb dans
ton

exemple.
Pour cela, il faut que tu affiches les tables systemes
(outils...options...onglet affichage, cocher tables systemes) et tu
procèdes

comme pour lier une table.
Après tu appliques la requête ci-dessous pour lister les requêtes de test1

Arnaud

"Jean Marie VIGNEAUD" a écrit dans le
message news: cq98k1$lhm$
Super,

Une dernière petite question.
Comment appliquer cette requête si je veux connaître la liste des objets
d'un autre fichier .mdb.

Exemple:

Je suis dans Test.mdb et je veux connaître la liste des requêtes
présentes


dans test1.mdb ??

Merci encore

"Gafish" a écrit dans le message de news:
e3J22$
Bonjour

Utilise la table MSysObjects.
Fais par exemple une requête :

SELECT * FROM MSysObjects WHERE type=5;

et tu auras dans name le nom de toutes tes requêtes, à mettre ensuite
en



source de ta liste.
Le type 5 filtre les requêtes, si tu enleves ce critères tu auras les
autres

objets de ta base.

Arnaud

"Jean Marie VIGNEAUD" a écrit dans
le



message news: cq97ho$kv8$
Bonjour,

Existe-til une fonction vba sous access 97, qui permettent de lister
le



contenu, ici les requêtes, d'un fichier.mdb et des les afficher dans
un



formulaire de type feuille de données??

Merci de votre aide.

Cordialement,

JMV
















Avatar
Gafish
Normalement quand tu fais un lien, il la renomme avec un compteur derrière,
par exemple ici MSysObjects1 non ? en tout cas c'est ce qu'il fait chez moi
je viens de retester, et j'ai 97 ici également

"Jean Marie VIGNEAUD" a écrit dans le
message news: cq9d2a$oar$
Le seul petit soucis est que la table MSysobjects existe déjà dans ma base
courantes et qu'il ne veut pas attacher celle de l'autre base.
... ?


"Gafish" a écrit dans le message de news:

Le mieux en ce cas c'est de lier la table MSysObjects de test1.mdb dans
ton

exemple.
Pour cela, il faut que tu affiches les tables systemes
(outils...options...onglet affichage, cocher tables systemes) et tu
procèdes

comme pour lier une table.
Après tu appliques la requête ci-dessous pour lister les requêtes de
test1



Arnaud

"Jean Marie VIGNEAUD" a écrit dans le
message news: cq98k1$lhm$
Super,

Une dernière petite question.
Comment appliquer cette requête si je veux connaître la liste des
objets



d'un autre fichier .mdb.

Exemple:

Je suis dans Test.mdb et je veux connaître la liste des requêtes
présentes


dans test1.mdb ??

Merci encore

"Gafish" a écrit dans le message de
news:



e3J22$
Bonjour

Utilise la table MSysObjects.
Fais par exemple une requête :

SELECT * FROM MSysObjects WHERE type=5;

et tu auras dans name le nom de toutes tes requêtes, à mettre
ensuite




en
source de ta liste.
Le type 5 filtre les requêtes, si tu enleves ce critères tu auras
les




autres
objets de ta base.

Arnaud

"Jean Marie VIGNEAUD" a écrit
dans




le
message news: cq97ho$kv8$
Bonjour,

Existe-til une fonction vba sous access 97, qui permettent de
lister





le
contenu, ici les requêtes, d'un fichier.mdb et des les afficher
dans





un
formulaire de type feuille de données??

Merci de votre aide.

Cordialement,

JMV




















Avatar
Jean Marie VIGNEAUD
Exacte quand on le fait à la mano à partir du menu, mais lorsque que l'on
passe par du code VBA, il semble qu'il n'utilise pas le compteur en
question.


"Gafish" a écrit dans le message de news:

Normalement quand tu fais un lien, il la renomme avec un compteur
derrière,

par exemple ici MSysObjects1 non ? en tout cas c'est ce qu'il fait chez
moi

je viens de retester, et j'ai 97 ici également

"Jean Marie VIGNEAUD" a écrit dans le
message news: cq9d2a$oar$
Le seul petit soucis est que la table MSysobjects existe déjà dans ma
base


courantes et qu'il ne veut pas attacher celle de l'autre base.
... ?


"Gafish" a écrit dans le message de news:

Le mieux en ce cas c'est de lier la table MSysObjects de test1.mdb
dans



ton
exemple.
Pour cela, il faut que tu affiches les tables systemes
(outils...options...onglet affichage, cocher tables systemes) et tu
procèdes

comme pour lier une table.
Après tu appliques la requête ci-dessous pour lister les requêtes de
test1



Arnaud

"Jean Marie VIGNEAUD" a écrit dans
le



message news: cq98k1$lhm$
Super,

Une dernière petite question.
Comment appliquer cette requête si je veux connaître la liste des
objets



d'un autre fichier .mdb.

Exemple:

Je suis dans Test.mdb et je veux connaître la liste des requêtes
présentes


dans test1.mdb ??

Merci encore

"Gafish" a écrit dans le message de
news:



e3J22$
Bonjour

Utilise la table MSysObjects.
Fais par exemple une requête :

SELECT * FROM MSysObjects WHERE type=5;

et tu auras dans name le nom de toutes tes requêtes, à mettre
ensuite




en
source de ta liste.
Le type 5 filtre les requêtes, si tu enleves ce critères tu auras
les




autres
objets de ta base.

Arnaud

"Jean Marie VIGNEAUD" a écrit
dans




le
message news: cq97ho$kv8$
Bonjour,

Existe-til une fonction vba sous access 97, qui permettent de
lister





le
contenu, ici les requêtes, d'un fichier.mdb et des les afficher
dans





un
formulaire de type feuille de données??

Merci de votre aide.

Cordialement,

JMV
























Avatar
Gafish
Tu utilises quoi pour lier ? transferdatabase ?

"Jean Marie VIGNEAUD" a écrit dans le
message news: cq9do4$oma$
Exacte quand on le fait à la mano à partir du menu, mais lorsque que l'on
passe par du code VBA, il semble qu'il n'utilise pas le compteur en
question.


"Gafish" a écrit dans le message de news:

Normalement quand tu fais un lien, il la renomme avec un compteur
derrière,

par exemple ici MSysObjects1 non ? en tout cas c'est ce qu'il fait chez
moi

je viens de retester, et j'ai 97 ici également

"Jean Marie VIGNEAUD" a écrit dans le
message news: cq9d2a$oar$
Le seul petit soucis est que la table MSysobjects existe déjà dans ma
base


courantes et qu'il ne veut pas attacher celle de l'autre base.
... ?


"Gafish" a écrit dans le message de
news:




Le mieux en ce cas c'est de lier la table MSysObjects de test1.mdb
dans



ton
exemple.
Pour cela, il faut que tu affiches les tables systemes
(outils...options...onglet affichage, cocher tables systemes) et tu
procèdes

comme pour lier une table.
Après tu appliques la requête ci-dessous pour lister les requêtes de
test1



Arnaud

"Jean Marie VIGNEAUD" a écrit
dans




le
message news: cq98k1$lhm$
Super,

Une dernière petite question.
Comment appliquer cette requête si je veux connaître la liste des
objets



d'un autre fichier .mdb.

Exemple:

Je suis dans Test.mdb et je veux connaître la liste des requêtes
présentes


dans test1.mdb ??

Merci encore

"Gafish" a écrit dans le message de
news:



e3J22$
Bonjour

Utilise la table MSysObjects.
Fais par exemple une requête :

SELECT * FROM MSysObjects WHERE type=5;

et tu auras dans name le nom de toutes tes requêtes, à mettre
ensuite




en
source de ta liste.
Le type 5 filtre les requêtes, si tu enleves ce critères tu
auras






les
autres
objets de ta base.

Arnaud

"Jean Marie VIGNEAUD" a écrit
dans




le
message news: cq97ho$kv8$
Bonjour,

Existe-til une fonction vba sous access 97, qui permettent de
lister





le
contenu, ici les requêtes, d'un fichier.mdb et des les
afficher







dans
un
formulaire de type feuille de données??

Merci de votre aide.

Cordialement,

JMV




























Avatar
Jean Marie VIGNEAUD
J'utilise la fonction suivante :

Option Compare Database
Option ExplicitPublic Function CreerTableAttachee(Repertoire As String,
NomDeLaTable As String) As Boolean
On Error GoTo Erreur
With CurrentDb
Dim TableAttachée As dao.TableDef
Set TableAttachée = .CreateTableDef(NomDeLaTable)
With TableAttachée
.Connect = ";database=" & Repertoire
.SourceTableName = NomDeLaTable
End With
.TableDefs.Append TableAttachée
CreerTableAttachee = True
End With
Set TableAttachée = Nothing
Exit Function
Erreur:
CreerTableAttachee = False
End Functionque j'appelle en faisant :CreerTableAttachee("c:bd1.mdb",
"Contacts")Voilà, voilà...J'ai trouvé cette fonction sur le site
:http://officesystem.access.free.fr/vba/creer_table_attachee.htmMerci"Gafish
" a écrit dans le message de news:

Tu utilises quoi pour lier ? transferdatabase ?

"Jean Marie VIGNEAUD" a écrit dans le
message news: cq9do4$oma$
Exacte quand on le fait à la mano à partir du menu, mais lorsque que
l'on


passe par du code VBA, il semble qu'il n'utilise pas le compteur en
question.


"Gafish" a écrit dans le message de news:

Normalement quand tu fais un lien, il la renomme avec un compteur
derrière,

par exemple ici MSysObjects1 non ? en tout cas c'est ce qu'il fait
chez



moi
je viens de retester, et j'ai 97 ici également

"Jean Marie VIGNEAUD" a écrit dans
le



message news: cq9d2a$oar$
Le seul petit soucis est que la table MSysobjects existe déjà dans
ma




base
courantes et qu'il ne veut pas attacher celle de l'autre base.
... ?


"Gafish" a écrit dans le message de
news:




Le mieux en ce cas c'est de lier la table MSysObjects de test1.mdb
dans



ton
exemple.
Pour cela, il faut que tu affiches les tables systemes
(outils...options...onglet affichage, cocher tables systemes) et
tu





procèdes
comme pour lier une table.
Après tu appliques la requête ci-dessous pour lister les requêtes
de





test1

Arnaud

"Jean Marie VIGNEAUD" a écrit
dans




le
message news: cq98k1$lhm$
Super,

Une dernière petite question.
Comment appliquer cette requête si je veux connaître la liste
des






objets
d'un autre fichier .mdb.

Exemple:

Je suis dans Test.mdb et je veux connaître la liste des requêtes
présentes


dans test1.mdb ??

Merci encore

"Gafish" a écrit dans le message
de






news:
e3J22$
Bonjour

Utilise la table MSysObjects.
Fais par exemple une requête :

SELECT * FROM MSysObjects WHERE type=5;

et tu auras dans name le nom de toutes tes requêtes, à mettre
ensuite




en
source de ta liste.
Le type 5 filtre les requêtes, si tu enleves ce critères tu
auras






les
autres
objets de ta base.

Arnaud

"Jean Marie VIGNEAUD" a
écrit







dans
le
message news: cq97ho$kv8$
Bonjour,

Existe-til une fonction vba sous access 97, qui permettent
de








lister
le
contenu, ici les requêtes, d'un fichier.mdb et des les
afficher







dans
un
formulaire de type feuille de données??

Merci de votre aide.

Cordialement,

JMV
































Avatar
Jean Marie VIGNEAUD
C'est bon avec la fonction TransferDataBase.

C'est super ... Merciiiiiiiiiiiiiii


"Jean Marie VIGNEAUD" a écrit dans le
message de news: cq9ehd$p6t$
J'utilise la fonction suivante :

Option Compare Database
Option ExplicitPublic Function CreerTableAttachee(Repertoire As String,
NomDeLaTable As String) As Boolean
On Error GoTo Erreur
With CurrentDb
Dim TableAttachée As dao.TableDef
Set TableAttachée = .CreateTableDef(NomDeLaTable)
With TableAttachée
.Connect = ";database=" & Repertoire
.SourceTableName = NomDeLaTable
End With
.TableDefs.Append TableAttachée
CreerTableAttachee = True
End With
Set TableAttachée = Nothing
Exit Function
Erreur:
CreerTableAttachee = False
End Functionque j'appelle en faisant :CreerTableAttachee("c:bd1.mdb",
"Contacts")Voilà, voilà...J'ai trouvé cette fonction sur le site

:http://officesystem.access.free.fr/vba/creer_table_attachee.htmMerci"Gafish

" a écrit dans le message de news:

Tu utilises quoi pour lier ? transferdatabase ?

"Jean Marie VIGNEAUD" a écrit dans le
message news: cq9do4$oma$
Exacte quand on le fait à la mano à partir du menu, mais lorsque que
l'on


passe par du code VBA, il semble qu'il n'utilise pas le compteur en
question.


"Gafish" a écrit dans le message de
news:




Normalement quand tu fais un lien, il la renomme avec un compteur
derrière,

par exemple ici MSysObjects1 non ? en tout cas c'est ce qu'il fait
chez



moi
je viens de retester, et j'ai 97 ici également

"Jean Marie VIGNEAUD" a écrit
dans




le
message news: cq9d2a$oar$
Le seul petit soucis est que la table MSysobjects existe déjà dans
ma




base
courantes et qu'il ne veut pas attacher celle de l'autre base.
... ?


"Gafish" a écrit dans le message de
news:




Le mieux en ce cas c'est de lier la table MSysObjects de
test1.mdb






dans
ton
exemple.
Pour cela, il faut que tu affiches les tables systemes
(outils...options...onglet affichage, cocher tables systemes) et
tu





procèdes
comme pour lier une table.
Après tu appliques la requête ci-dessous pour lister les
requêtes






de
test1

Arnaud

"Jean Marie VIGNEAUD" a écrit
dans




le
message news: cq98k1$lhm$
Super,

Une dernière petite question.
Comment appliquer cette requête si je veux connaître la liste
des






objets
d'un autre fichier .mdb.

Exemple:

Je suis dans Test.mdb et je veux connaître la liste des
requêtes







présentes
dans test1.mdb ??

Merci encore

"Gafish" a écrit dans le message
de






news:
e3J22$
Bonjour

Utilise la table MSysObjects.
Fais par exemple une requête :

SELECT * FROM MSysObjects WHERE type=5;

et tu auras dans name le nom de toutes tes requêtes, à
mettre








ensuite
en
source de ta liste.
Le type 5 filtre les requêtes, si tu enleves ce critères tu
auras






les
autres
objets de ta base.

Arnaud

"Jean Marie VIGNEAUD" a
écrit







dans
le
message news: cq97ho$kv8$
Bonjour,

Existe-til une fonction vba sous access 97, qui permettent
de








lister
le
contenu, ici les requêtes, d'un fichier.mdb et des les
afficher







dans
un
formulaire de type feuille de données??

Merci de votre aide.

Cordialement,

JMV




































Avatar
Gafish
ok, c'est pour cela, ca m'étonnait que transferdatabase ne t'incrémente pas
un compteur.

"Jean Marie VIGNEAUD" a écrit dans le
message news: cq9ep0$p92$
C'est bon avec la fonction TransferDataBase.

C'est super ... Merciiiiiiiiiiiiiii


"Jean Marie VIGNEAUD" a écrit dans le
message de news: cq9ehd$p6t$
J'utilise la fonction suivante :

Option Compare Database
Option ExplicitPublic Function CreerTableAttachee(Repertoire As String,
NomDeLaTable As String) As Boolean
On Error GoTo Erreur
With CurrentDb
Dim TableAttachée As dao.TableDef
Set TableAttachée = .CreateTableDef(NomDeLaTable)
With TableAttachée
.Connect = ";database=" & Repertoire
.SourceTableName = NomDeLaTable
End With
.TableDefs.Append TableAttachée
CreerTableAttachee = True
End With
Set TableAttachée = Nothing
Exit Function
Erreur:
CreerTableAttachee = False
End Functionque j'appelle en faisant :CreerTableAttachee("c:bd1.mdb",
"Contacts")Voilà, voilà...J'ai trouvé cette fonction sur le site



:http://officesystem.access.free.fr/vba/creer_table_attachee.htmMerci"Gafish

" a écrit dans le message de news:

Tu utilises quoi pour lier ? transferdatabase ?

"Jean Marie VIGNEAUD" a écrit dans
le



message news: cq9do4$oma$
Exacte quand on le fait à la mano à partir du menu, mais lorsque que
l'on


passe par du code VBA, il semble qu'il n'utilise pas le compteur en
question.


"Gafish" a écrit dans le message de
news:




Normalement quand tu fais un lien, il la renomme avec un compteur
derrière,

par exemple ici MSysObjects1 non ? en tout cas c'est ce qu'il fait
chez



moi
je viens de retester, et j'ai 97 ici également

"Jean Marie VIGNEAUD" a écrit
dans




le
message news: cq9d2a$oar$
Le seul petit soucis est que la table MSysobjects existe déjà
dans






ma
base
courantes et qu'il ne veut pas attacher celle de l'autre base.
... ?


"Gafish" a écrit dans le message
de






news:

Le mieux en ce cas c'est de lier la table MSysObjects de
test1.mdb






dans
ton
exemple.
Pour cela, il faut que tu affiches les tables systemes
(outils...options...onglet affichage, cocher tables systemes)
et







tu
procèdes
comme pour lier une table.
Après tu appliques la requête ci-dessous pour lister les
requêtes






de
test1

Arnaud

"Jean Marie VIGNEAUD" a
écrit







dans
le
message news: cq98k1$lhm$
Super,

Une dernière petite question.
Comment appliquer cette requête si je veux connaître la
liste








des
objets
d'un autre fichier .mdb.

Exemple:

Je suis dans Test.mdb et je veux connaître la liste des
requêtes







présentes
dans test1.mdb ??

Merci encore

"Gafish" a écrit dans le
message








de
news:
e3J22$
Bonjour

Utilise la table MSysObjects.
Fais par exemple une requête :

SELECT * FROM MSysObjects WHERE type=5;

et tu auras dans name le nom de toutes tes requêtes, à
mettre








ensuite
en
source de ta liste.
Le type 5 filtre les requêtes, si tu enleves ce critères
tu









auras
les
autres
objets de ta base.

Arnaud

"Jean Marie VIGNEAUD" a
écrit







dans
le
message news: cq97ho$kv8$
Bonjour,

Existe-til une fonction vba sous access 97, qui
permettent










de
lister
le
contenu, ici les requêtes, d'un fichier.mdb et des les
afficher







dans
un
formulaire de type feuille de données??

Merci de votre aide.

Cordialement,

JMV