Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1347 connectés 

  FORUM HardWare.fr
  Programmation

  [VBA] Comment tester l'existence d'une table ?

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[VBA] Comment tester l'existence d'une table ?

n°36657
ho
123pafpastèque !
Posté le 01-06-2001 à 23:39:52  profilanswer
 

Je sais, ça doit être tout con, mais j'ai eu beau éplucher l'aide, pas de réponse ... alors, avis aux âmes charitables.

mood
Publicité
Posté le 01-06-2001 à 23:39:52  profilanswer
 

n°36727
ho
123pafpastèque !
Posté le 02-06-2001 à 21:00:50  profilanswer
 

Précision: j'ai une bd access qui contient un ensemble de tables.
Je veux importer une table d'une autre base, mais je voudrais d'abbord vérifier si elle n'est pas déjà présente dans la base. Le tout en VB bien sûr.

n°36752
ho
123pafpastèque !
Posté le 03-06-2001 à 11:31:44  profilanswer
 

Ok merci pour voter aide, j'ai résolu le problème. ;)
 
Pour info, voici une solution qui fonctionne à la perfection.
 
Pour savoir si une table existe dans une base (l'objectif étant de l'importer si elle n'existe pas), il suffit d'essayer de la supprimer et d'implémenter le système de gestion d'erreur.
 
ex :
 
sub machin ()
 
...
 
On Error GoTo Erreur_machin
 
DoCmd.DeleteObject acTable, "table_a_importer"
 
'si la table n'existe pas : erreur 3011
'si elle existe elle a été effacée : on peut la réimporter
 
DoCmd.TransferDatabase acImport, "Microsoft Access", chemin_ancienne_base, acTable, "table_a_importer", "table_a_importer", False, False
 
...
 
Erreur_machin:
 
    If Err.Number = 3011 Then
        Err.Clear
        Resume Next
        'on ne fait rien mais on reprend l'exécution juste après la ligne qui a généré l'erreur
    End If
 
end sub
 
(merci à NitRic qui m'a bien mis sur la voie sur le forum VBFrance.com)
 
all is well, end is well

 

[edit]--Message édité par Ho--[/edit]

n°36805
Clarkent
Musclor le shérif de l'espace
Posté le 04-06-2001 à 05:18:38  profilanswer
 

sinon tu pouvais essaye de la creer et ca t aurais aussi retourner une erreur si elle existait deja je crois bien :D.
enfin desole depas avoir repondu lutot car j avaispas vu:D, et j avais fait un truc similaire l annee derniere mais je me souviens plus trop, enfin jaurais regarder mon listing :).


---------------
"PAR LE POUVOIR DU CRÂNE ANCESTRAL, JE DETIENS LA FORCE TOUTE PUISSANTE".

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation

  [VBA] Comment tester l'existence d'une table ?

 

Sujets relatifs
[ACCESS] migration d'une table vers un server SQL[VB6] Comment faire appel à un champ d'une table
[MySQL-Win] réparer une table corrompueComment envoyer le contenu d'une table
[VBA] file,dir,drivelistbox ?[ASP] Comment tester si une variable est numérique ou une chainedecar
[ASP] est-ce possible d'écrire dans une table si on utilise une[PHP] Tester un serveur (faire un ping), c'est possible ?
[ASP] Obtenir le dernier enregistrement d'une table ?[php] Comment tester qu'une variable est éguale à un espace..
Plus de sujets relatifs à : [VBA] Comment tester l'existence d'une table ?


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR