Bonsoir,
J'ai un message d'erreur lorsque je veux compacter ma base.
la table TempMsysAccessobjets existe déjà
Je ne vois pas ce que cela peut-être.
Avez vous la solution à ce problème
Merci d'avance
Daniel
Bonsoir,
J'ai un message d'erreur lorsque je veux compacter ma base.
la table TempMsysAccessobjets existe déjà
Je ne vois pas ce que cela peut-être.
Avez vous la solution à ce problème
Merci d'avance
Daniel
Re,
En cherchant sur le forum, je me suis inspiré de ce code et j'ai le test.
Effectivement la table existe. Comment faire pour réparer ma base.
Faut-il supprimer cette table et si oui comment s'y prend-t-on, car elle n'apparaît pas dans la liste des tables de ma base. Peut-on la faire apparaître ?
Bonsoir à tous,
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24 Private Sub Commande0_Click() Dim db As DAO.Database Dim tbl As DAO.TableDef ' Ouvre la base de données Set db = CurrentDb Dim strListeTables As String 'Parcourt toute la collection TableDefs For Each tbl In db.TableDefs 'exlusion des tables système If Left(tbl.Name, 4) <> "MSys" Then strListeTables = strListeTables & tbl.Name & ";" End If Next ListeTables.RowSourceType = "Liste valeurs" 'A traduire dans la langue ListeTables.RowSource = strListeTables End Sub
Daniel
Re,
Comme on dit la nuit porte conseils, et j'ai trouvé la solution tout seul comme un grand.
En fait il faut tout simplement cocher dans Outils Options l'affichage des objets Masqués et systèmes.
J'ai renomé cette table et fais un test et j'ai donc pu compacter ma base.
J'ai supprimé la table ensuite.
Apparemment tout fonctionne correctement.
Salut
Daniel
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager