Auteur

MVP Office Access 2003, 2004, 2005 et 2006

Codes pour Access

Base de données

Administrateur

Table

º Exporter structure
º Lister les tables dans une table
º Lister les tables dans une variable
º NumAuto Perso
º Supprimer une table externe
º Tester l'existence d'une table

Tester l'existence d'une table externe

Requête

Formulaire

Dates & Heures

Nombre

Math

Fichier

Commandes externes

Automation

Equivalence

Tuto Access 2007

Base de données

Lettre d'information

Table - Tester l'existence d'une table externe

Description

		Cette fonction permet de vérifier la présence d'une table dans une base de données externe.

Synthaxe

TableExistExt (strBase, strTable)

La synthaxe de la fonction TableExistExt comprend les éléments suivants :

Eléments	Description
strBase	Expression de chaîne correspondant au nom de la base de données où l'on souhaite vérifier la présence d'une table.
strTable	Expression de chaîne correspondant au nom de la table que l'on veut vérifier.

Exemple

		Aucun exemple disponible pour le moment.

Code de la fonction

Public Function TableExistExt(strBase As String, _
strTable As String) As Boolean

Dim db As Database, tdf As TableDef
TableExistExt = False
Set db = OpenDatabase(strBase)
For Each tdf In db.TableDefs
If tdf.Name = strTable Then TableExistExt = True: Exit For
Next
db.Close: Set db = Nothing

End Function

Date de création : 22/09/2006 @ 00:02
Dernière modification : 22/09/2006 @ 00:02
Catégorie : Table
Page lue 1760 fois

Prévisualiser la page Imprimer la page