Discussion :

[kriss_87]

Bonjour et bon 1 er Mai!!!
Voila j'ai un gros soucis...
J'ai un projet à rendre en VB6 avec les fichiers.
Le problème c'est que je ne sais pas comment on fait pour réécrire un enregistrement...
Merci beaucoup d'avance.

[chmod777]

avec access ou juste dans un fichier texte?

[kriss_87]

Dans ce cas sa serait pour réécrire une enregistrement dans un fichier texte.

[Tyrael62]

T'as essayé de regarder dans la FAQ ou le tutoriel VB!Je pense que tu trouveras certaines réponses à ton problème!
Vu que tu veux faire un fichier qui permet de rajouter des enregistrements , je te conseille de regarder les fichiers à accès direct!
Bonne continuation.

[kriss_87]

J'ai essayé de regarder dans la FAQ VB mais je ne trouve rien qui répond à ma question... désolé
Ce que je souhaite c'est savoir comment on réécrit dans un fichier que l'on déjà créé. Voici le cours que l'on à fait mais visiblement cela ne marche pas

6_ Réecrire un Enregistrement:

Seek filenumber, Loc(filenumber)
Put filenumber,,Varnam

Par Exemple :
Algorithimique :

Lire (fClient, unClient)
…
Réecrire (fClient, unClient)
Visual Basic

Get fClient,,unClient
…
Seek fClient, LOC (fClient)
Put fClient,,unClient

1) Descriptions

Filename : Cf Ouvrir un Fichier
Varname : Nom de la variable source des informations à écrire
Seek : Définit la position de la prochaine opération de la lecture/écriture dans un fichier ouvert à l’aide de l’instruction Open
LOC : Renvoie une valeur de type Long indiquant la position de lecture courante dans un fichier ouvert ;
Len : Donne la longueur d’une chaîne de caractère.


2) Exemple :

SUB cmdModifier_un_client()
DIM idC AS String *6
DIM fclient AS Long
DIM unClient AS TyClient

Fclient = filenum ()
Open App.Path & « \ » & fClient For Random Access Write As fClient len = len (unClient)

WHILE NOT EOF (fClient) AND unClient, idC<>idC
Get fClient,,unClient
WEND
IF NOT EOF (fClient) THEN
unClient.nom=Text2
unClient.prénom=Text3
unClient.mtFac=Text4
Seek fClient, LOC (fClient)
Put fClient,,unClient
END IF
Close (fClient)
END SUB

Je voudrais donc savoir votre avis sur ce morceaux de code, et si par la même occasion vous trouvez une erreur prévenez moi.
Merci.

[SfJ5Rpw8]

Bon je trouve pas grand chose à dire sur ce code... il doit fonctionner ... quel est ton probléme ...? tu ve l'adapter à un autre format d'enregistrement??
.. Ce Code ne permet que la modification d'enregistrement existant ( même id Client...) s'il ne trouve pas d'enregistrement correspondant ..il ne fait ... rien ...? peu-être faut-il le modifier pour qu'il rajoute l'enregistrement en fin ?