Discussion :

[guefrachi]

Bonsoir à tous

j'enregistre des données à l'aide du code suivant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
With MonRs
.AddNew
.Fields("TI1") = 130
.Fields("DAT") = Calendar1.Value
.Update
End With

la taille du fichier .mdb augmente. le problème;

premièrement les données ne sont pas enregistrées dans l'ordre de leur création (il y a chevauchement entre les données de 25/01/2010 et celles de 26/01/2010 par exple)
Je veux que le record nouvellement ajouté s'ajoute toujours à la fin de la table même après redémarrage successif de l'application

deuxièmement même lorsque je supprime tous les records à l'aide de l'instruction suivante

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Cnn1.Execute "DELETE FROM ert WHERE DAT=#" & Format$(Calendar1.Value, "dd-mm-yyyy") & "# "

la taille reste comme si je n'ai rien fait. y a t-il une explication?

Merci d'avance

[DAUDET78]

J'ai souvenir qu'il faut recompacter la base de donnée pour supprimer réellement les anciennes valeurs et diminuer sa taille

[stigma]

Mets un .close après le .Update

[guefrachi]

Merci à vous deux

il me manquait la compacter et le redémarrage ( close puis open) est aussi indispensable

Merci bcp Problème résolu