Tester l'existence d'une table en VB ? [Access] - Programmation
Marsh Posté le 07-06-2001 à 09:39:04
hummm   
   
  
je pense ke tu pourrais te faire une requête sur cette table (prendre n'importe kel enregistrement) et tester le recordcount 
Si celui ci est = 0 alors ta table n'existe pas. 
 
Mais il est possible ke ça plante; en efft si elle n'existe pas ben ton recordset plantera. 
 
Je ne vois ke ça pour l'instant
Marsh Posté le 07-06-2001 à 10:49:55
en gros ca devrait marcher 
un truc comme ca 
 
Set monwork = DBEngine.Workspaces(0) 
Set mabd = monwork.Databases(0) 
Set matable = mabd.TableDefs(I)    
 
For I = 0 To mabd.TableDefs.Count - 1 
      If matable.name = "toto" Then 
         trouve = "oui" 
         exit sub 
      end if 
next
Marsh Posté le 07-06-2001 à 11:10:51
c'est plutot ca! 
 
Set monwork = DBEngine.Workspaces(0)  
Set mabd = monwork.Databases(0)  
 
For I = 0 To mabd.TableDefs.Count - 1  
      Set matable = mabd.TableDefs(I)     
      If matable.name = "toto" Then  
         trouve = "oui"  
         exit sub  
      end if  
next
Marsh Posté le 07-06-2001 à 11:28:44
| robinmasters a écrit a écrit  : c'est plutot ca! Set monwork = DBEngine.Workspaces(0) Set mabd = monwork.Databases(0) For I = 0 To mabd.TableDefs.Count - 1 Set matable = mabd.TableDefs(I) If matable.name = "toto" Then trouve = "oui" exit sub end if next | 
 
 
j'essaye ça...
Marsh Posté le 07-06-2001 à 09:34:02
J'aimerais savoir si il existe un moyen de tester l'existence d'une table en VB sous Access.
 
 
J'esperais qu'un truc du genre : If exist Table ..... Then ... mais visiblement y connait pas.
J'ai cherché dans l'aide mais rien à l'horizon
Heeelp
@+