Discussion :

[zizou74]

Bonjour,

j'utilisais Access 2007 et depuis peu, je suis passé en 2010.

Je travail sur un fichier qui faisait 30 Mo lorsque je le sauvegardai avec acc 2007 et lorsque je le sauvegarde avec 2010, en vérifiant dans l'explorateur il ne fait plus que 5 Mo en taille. J'ai vérifié dans l'onglet Fichier / options / Base de données active, je note que la case "Compacter lors de la fermeture" n'est pas cochée.

Donc je ne comprends pas et vos lanternes sont les bienvenues, merci d'avance pour votre support

Zizou

[rnd]

Bonjour,

Dans ce sens là c'est plutôt une bonne nouvelle (sauf si il manque des objets ou données)

Je pense qu'il y a un compactage lors de la première ouverture d'un format sous 2010. Tout simplement.

Perso, je laisse cocher compacter à la fermeture.

Cdt, Renaud.

[zizou74]

Merci pour la réponse mais j'aimerai avoir d'autres avis car je ne suis pas rassuré.

[marot_r]

Bonjour

As-tu converti ta version 2007 en version 2010 ?

Si oui, Access fait le ménage dans les objets temporaires lors de la conversion donc cela expliquerait la baisse de taille.

A+

[marot_r]

Aussi un contrôle rapide que tu peux faire sur tes données est de vérifier le nombre d'enregistrement et de relations en 2007 puis en 2010 et t'assurer qu'ils sont identiques. Ce n'est pas une garantie absolue mais c'est une bonne indication.

Voici un bout de code qui fait cela : compter les enregistrements et les relations. À mettre dans un module.

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
25
26
27
28
29
30
31
32
33
34
35
36
 
Option Compare Database
Option Explicit
 
Private Sub VerifierAvantApresCompactage()
    Call CompterEnr
    Call CompterRelation
End Sub
 
Private Sub CompterEnr()
    Dim db As DAO.Database: Set db = CurrentDb
 
    Dim cptEnr As Long
    Dim nbEnr As Long
 
    Dim t As DAO.TableDef: For Each t In db.TableDefs
 
        If Not (t.Name Like "MSys*" Or t.Name Like "~*") Then
            nbEnr = DCount("*", t.Name)
            cptEnr = cptEnr + nbEnr
        End If
 
    Next t
 
    db.Close: Set db = Nothing
 
    Debug.Print "Nombre total d'enregistrements toutes tables confondues : " & cptEnr
End Sub
 
Private Sub CompterRelation()
    Dim db As DAO.Database: Set db = CurrentDb
    Dim nbRel As Long: nbRel = db.Relations.Count
    db.Close: Set db = Nothing
 
    Debug.Print "Nombre total de relations _____________________________ : " & nbRel
End Sub

Note ce code suppose que tu n'as que des tables locales, je n'ai pas fait de test pour éliminer les tables liées du processus de comptage.

A+

[zizou74]

Bonjour Marot,

Merci pour ton aide. En fait, j'ai désinstallé office 2007 et j'ai installé office 2010.

J'ai vérifié le nombre d'enregistrements et tout me parait identique entre les 2 bases mais la taille diffère .

Je ne m'y connais malheureusement pas en module car mes connaissances sur access sont très limitées et pour info tu trouveras ci-joint mes 2 bases (acc 2007 et acc 2010).
Ce serait sympa si tu peux y jeter un petit coup d'oeil d'expert Access 2007.rarAccess 2010.rar.

Merci d'avance pour tout aimable support.
Zizou

[marot_r]

Que la taille diffère n'est pas surprenant ni forcément inquiétant.

Les versions d'access varient dans leur capacité à 'nettoyer' une base de ses objets temporaires. Par exemple, 2007 compacte la BD plus que 2003.
Note que ces objets ne sont pas visibles pour l'humain.

Il est très possible que Access 2010 ait fait un nettoyage au moment où il a ouvert la BD 2007 la 1ère fois.

Pour le module c'est assez simple, tu va dans l'éditeur de code et tu ajoutes un nouveau module.
Après tu copies le code que je t'ai envoyé dans ce module.
Tu lances ensuite l'éxécution de CompterEnr()

A+

[zizou74]

Merci à toi marot, je vais faire le test avec le module et je reviens lundi pour donner le verdict.

Toutefois, je suis passé de 30 Mo (acc 2007) à 5 Mo (acc 2010), je veux bien qu'il ait nettoyé des fichiers temporaires mais 25 Mo de différence, je trouve ça beaucoup.

Merci pour ton support et à lundi, bon week-end

[marot_r]

Tu serais surpris de la cochonnerie que Access peut accumuler.

J'ai eu des BDs qui faisaient presque 2 Go et qui une fois nettoyées tombaient à 300 Mo.

C'est pour éviter ce gonfement qu'il est recommandé d'activre l'option "compacter en sortant" qui va éliminer les objets temporaires après chaque utilisation.

Et de la faire à la main si Access ne le fait pas automatiquement.

Note que si ta BD est grosse, le compactage prend du temps et l'utilisateur peut penser que Access est planté. Il faut le prévenir que les délais est normal.

A+