Question : VBA pour supprimer une série spécifique de tables d'accès

J'ai une base de données d'accès avec la liste de tables suivante :

tblType1Apple
tblType1Pear
tblType2Cabbage
tblType3Car


I recherchant un bloc de code de VBA qui laissera tomber (enlever) TOUTES LES tables dans ma base de données qui commencent par « tblType1 ».  
Notice que je veux « laisser tomber » la table par opposition à la « suppression » la table.  En termes de SQL elle serait n'importe quoi de pareil : class= " lineNumbers " >
1 de >

Sub " de


Maybe de


class= de

Réponse : VBA pour supprimer une série spécifique de tables d'accès

employer le tabledef

obscurcir le TD comme dao.tabledef, DB comme dao.database
placer le db=currentdb

pour le chaque TD dans db.tabledefs
    si parti (td.name, 8)= " tblType1 " puis
        db.execute « table de baisse [« et td.name et »] »
    finir si
après
Autres solutions  
  •  MS Excel 2007 et pdf - l'exportation vers le pdf prend de longues heures !
  •  Dans le Perl, comment j'ajoute une valeur à la liste, puis le contrôle pour voir si la valeur existent avant d'ajouter une nouvelle valeur
  •  Comment fais j'initialiser de la HP BL460c G6 de san et de la HP XP 240000
  •  Comment fais j'employer une clef de permis de volume sur un ordinateur de HP avec du CD de restauration
  •  Emplacement primaire de deux SCCM dans l'annuaire actif
  •  L'initiateur et la HP D2D de l'iSCSI R2 du serveur 2008 de Windows GERCENT l'issue
  •  Stocker le dossier dans le mysql using connector.net et le champ de goutte
  •  Carte vidéo d'USB - bit 32 sur le matériel travaillant au niveau du bit 64 ?
  •  asp.net que j'essaye de convertir une forme de HTML en forme d'aspx ou ? ce qui jamais. Aide du besoin sur la façon dont à à elle.
  •  Winzip 12 issues de secours du travail ?
  •  
    programming4us programming4us