[Access] Tester l'existence d'une table en VB ?

Recherche :

Dernière réponse

Sujet : [Access] Tester l'existence d'une table en VB ?

k-id

robinmasters a écrit a écrit :

c'est plutot ca!

Set monwork = DBEngine.Workspaces(0)
Set mabd = monwork.Databases(0)

For I = 0 To mabd.TableDefs.Count - 1
Set matable = mabd.TableDefs(I)
If matable.name = "toto" Then
trouve = "oui"
exit sub
end if
next

j'essaye ça...

Votre réponse

Nom d'utilisateur

Pour poster, vous devez être inscrit sur ce forum .... si ce n'est pas le cas, cliquez ici !

Le ton de votre message

Votre réponse

Smilies

Liste des smilies perso
Wiki smilies
Chercher un smiley

Options

Activer votre signature
Désactiver les smilies
Activer la notification par email du sujet

Aperçu

Vous avez perdu votre mot de passe ?

Vue Rapide de la discussion

k-id

j'essaye ça...

Robinmasters

c'est plutot ca!

Set monwork = DBEngine.Workspaces(0)
Set mabd = monwork.Databases(0)

For I = 0 To mabd.TableDefs.Count - 1
Set matable = mabd.TableDefs(I)
If matable.name = "toto" Then
trouve = "oui"
exit sub
end if
next

Robinmasters

en gros ca devrait marcher
un truc comme ca

Set monwork = DBEngine.Workspaces(0)
Set mabd = monwork.Databases(0)
Set matable = mabd.TableDefs(I)

For I = 0 To mabd.TableDefs.Count - 1
If matable.name = "toto" Then
trouve = "oui"
exit sub
end if
next

tom64

hummm :??: :??:
je pense ke tu pourrais te faire une requête sur cette table (prendre n'importe kel enregistrement) et tester le recordcount
Si celui ci est = 0 alors ta table n'existe pas.

Mais il est possible ke ça plante; en efft si elle n'existe pas ben ton recordset plantera.

Je ne vois ke ça pour l'instant

k-id	J'aimerais savoir si il existe un moyen de tester l'existence d'une table en VB sous Access. J'esperais qu'un truc du genre : If exist Table ..... Then ... mais visiblement y connait pas. J'ai cherché dans l'aide mais rien à l'horizon :( Heeelp @+