salut a tout le monde je me trouve actuellement devant un probleme. voila je voudrais crée plusieure table dans access 2007 en vb6 voila le bout de code :
 
Dim cat As New ADOX.Catalog
 Dim tbl As New ADOX.Table
 Dim key As New ADOX.key
 
 cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=e:\bdd\turfpro.accdb"
 
 '***********************************************
 '**     Ajout d'une table1                                                **
 '***********************************************
 
    tbl.Name = "table1"
     ici je mettrai les champ par rapport a la table
   ' cat.Tables.Append tbl                    si je rajoute  
 
 '***********************************************
 '**     Ajout d'une table2                                                **
 '***********************************************
 
  tbl.Name = "table2"
    ici je mettrai les champ par rapport a la table
  cat.Tables.Append tbl
 
j'obtient le message d'erreur suivant 3367 objet deja préesent dans la collection.ajout impossible.
 
merci d'avance de votre aide