Test existence d'une table dans un fichier mdb

Le
Olivier
Bonjour,

Je cherche une fonction sous access qui permet de tester
l'existence d'une table dans un fichier mdb.

ex : si la table existe alors
"traitement"
sinon
"autre traitement"


Si quelqu'un peut m'aider !!!
Merci d'avance.
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Le #5010681
salut,

voila
http://access.jessy.free.fr/htm/File/FileExist.htm

sylvain

-----Message d'origine-----
Bonjour,

Je cherche une fonction sous access qui permet de tester
l'existence d'une table dans un fichier mdb.

ex : si la table existe alors
"traitement"
sinon
"autre traitement"


Si quelqu'un peut m'aider !!!
Merci d'avance.
.



Gilbert
Le #5010661
Bonjour

Voici ce que j'utilise:

Public Function ChercherTable(strTableName As String, Optional NomBase As
String) As Boolean
Dim Db As Database
Dim i As Integer
If NomBase = "" Then
Set Db = DBEngine.Workspaces(0).Databases(0)
Else
Set Db = DBEngine.Workspaces(0).OpenDatabase(NomBase)
End If
ChercherTable = False
Db.TableDefs.Refresh
For i = 0 To Db.TableDefs.Count - 1
If strTableName = Db.TableDefs(i).Name Then 'la table existe
ChercherTable = True
Exit For
End If
Next i
Set Db = Nothing
End Function


Cordialement

Gilbert
"Olivier" news:1742401c418a7$8e106260$
Bonjour,

Je cherche une fonction sous access qui permet de tester
l'existence d'une table dans un fichier mdb.

ex : si la table existe alors
"traitement"
sinon
"autre traitement"


Si quelqu'un peut m'aider !!!
Merci d'avance.


Publicité
Poster une réponse
Anonyme