J'aimerais savoir comment on fait pour qu'un enregistrement soir définitivement supprimer d'un fichier.

J'ai essayer ceci :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
cpt = Cb_nom.ListIndex + 1
 
            Do
 
                Get #1, cpt + 1, enr_util
 
                Put #1, cpt, enr_util
 
                cpt = cpt + 1
 
            Loop Until EOF(1)
Et quand je charge mon fichier, il y a des enregistrement qui sont blan.