arf

coucou

3113121131211
13211311122113111221
111312211331222113312211

bon a plus tout le monde.
Mon pote doit partir donc moi aussi.
A bientot j´espere,passez le bonjour aux autres énigmeurs de ma part.

Pete, VB sous Access?
Je peux te dire que j´ai écrit une gestion de production complète sous VB avec comme moteur Access ( 20 000 lignes de code). Société Wanzl à Selestat.
Alors si je peux t´aider, n´hésite pas à me demander.

Salut Burns et à bientôt stp!!!

@ +++ brns !
bonne journée !
ziboux

Ok
En fait c´est plus une question Access, voire carrément SQL que j´ai.
J´aimerais faire une requête qui me liste tous les noms de table de ma base, pour que je puisse les afficher dans une liste déroulante.

bonjour tt le monde!

ça va?

baha comment vas tu ?

coucou baha
ca faisait longtemps !

Function RenvoyerNomstables()
Dim MyDb As Database
Set MyDb = CurrentDb()
For I = 0 To MyDb.TableDefs.Count - 1
RenvoyerNomstables = RenvoyerNomstables & MyDb.TableDefs(I).Name & " ;"
Next I
End Function

Salut Baha!
Comme ça fait longtemps!

Salut Baha!
Tu fais toujours du street hockey?

-laureen- > oui, c´est par ce que je n´avait plus d´ordi depuis 3 semaines et avant j´avait des exams!

lyle > je vais bien mais je fait de la retouche d´imade et comme je suis sur l´ordi de mon pere et qu´il est vieux, il ne supporte pas que j´aille sur le net en même tps!

Merci Jop.
Donc je peux faire MaListe.Caption ( ou . Text je sais plus là) = RenvoyerNomsTables ?

baha>> je suis contente que tu puisse enfin venir

Oui Pete.
Cette fonction va aussi renvoyer les tables systèmes, att ( les fameuses tables commençant par MSys . . ex: MSysAccessObjects).
Donc si tu ne les veux pas, il faut rajouter un petit test, je te le fais?

ordreimparfait = jop???

oui, j´en fait encore!

y´a-t-il une enigme en cours?

Je veux bien Jop