J'ai un module contenant :
 
Public Type Racer
    Racer_ID As Integer
    Racer_Nom As String
End Type
 
Dans mon code, j'écris :  
 
dim PiLoTe as Racer
    With PiLoTe
        .Racer_ID = txtID.Text
        .Racer_Nom = TxtNom.Text
    end with
 
Open App.Path & "\Racer.dds" For Append As #1
Write #1, PiLoTe.Racer_ID, PiLoTe.Racer_Nom
Close #1
 
J'ai simplifié car il y a beaucoup plus d'information que cela par "racer". Il n'y aurait pas un moyen pour enregistrer un racer comme : Write #1, Pilote  ???????

svp une réponse !! J'en ai vraiment besoin...

Si j'ai pas trop mal compris, le but est de ne pas avoir une ligne avec 150 champs.
 
On peut écrire l'enregistrement (le terme est peut-être pas le meilleur, je date un peu) Pilote d'un coup.  
 
Faut ouvrir le fichier en binaire, et utiliser put (get pour relire). Il doit y avoir une instruction seek pour se placer à un endroit donné (la fin du fichier pour "append"er). Quand on écrit Pilote, ce sont tous les champs qui sont concernés. Pour écrire le suivant, faut faire un seek de la taille de Pilote (pour déplacer le pointeur au bon endroit).  
Attention, en binaire, on peut faire toutes les bétises.. Si on écrit à la mauvaise position (mal calé), on écrase,... mais c'est efficace.

Merci ! Je vais fouiller sur ça, ça me reviens tranquillement ! ( Je sais que j'avais déjà fait quelque chose comme ça mais ca fait longtemps. ) Bye ! Thx =)