Comment chercher un mot dans un fichier texte et le modifier? [Résolu]

cs_PetiteAnge 6 Messages postés jeudi 8 novembre 2007Date d'inscription 17 avril 2010 Dernière intervention - 13 mai 2009 à 10:25 - Dernière réponse : cs_PetiteAnge 6 Messages postés jeudi 8 novembre 2007Date d'inscription 17 avril 2010 Dernière intervention
- 13 mai 2009 à 14:53
Bonjour,

Avant de poster ma questtion j'ai cherché dans la FAQ VB et les tutoriels VB mais ce j'ai trouvé c'était toujours comment modifier un fichier en lui ajoutant une nouvelle information.
Alors que ce que je désire moi c'est en fait chercher un mot dans un fichier texte associé à une procédure VB, par exemple chercher le mot "NomChamp1" et la changer par "Num_Etudiant" vu que je travaille sur un générateur de code je dois modifier certaines valeurs.
J'ai vraiment besoin de votre aide le plutôt possible.

Et merci d'avance.
Afficher la suite 

Votre réponse

4 réponses

Meilleure réponse
Renfield 17307 Messages postés mercredi 2 janvier 2002Date d'inscriptionModérateurStatut 18 janvier 2017 Dernière intervention - 13 mai 2009 à 10:54
3
Merci
lis tout ton fichier,
fais ta modif (InStr et Mid$)
puis réécris le fichier.

c'est sommes toutes assez basique.

Dim iFile As Integer
Dim sBuffer As String
Dim nPos As Long
iFile = FreeFile
Open "C:\a.txt" For Input As iFile
sBuffer = Input(LOF(iFile), iFile)
Close iFile

nPos = InStr(sBuffer, "NomChamp1")
If nPos Then
sBuffer = Left$(sBuffer, nPos - 1) & "Num_Etudiant" & Mid$(sBuffer, nPos + 9)
Open "C:\a.txt" For Output As iFile
Print #iFile, sBuffer;
Close iFile
End If

Merci Renfield 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 70 internautes ce mois-ci

Commenter la réponse de Renfield
Meilleure réponse
Renfield 17307 Messages postés mercredi 2 janvier 2002Date d'inscriptionModérateurStatut 18 janvier 2017 Dernière intervention - 13 mai 2009 à 13:39
3
Merci
utilises deux fichiers...

un modèle, qui contiendrai nomChamp1 et l'autre, le fichier cible.

Merci Renfield 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 70 internautes ce mois-ci

Commenter la réponse de Renfield
cs_PetiteAnge 6 Messages postés jeudi 8 novembre 2007Date d'inscription 17 avril 2010 Dernière intervention - 13 mai 2009 à 12:18
0
Merci
Je vous remercie infiniment Renfield, ça m'as beaucoup aidé
mais si vous me permettez j'ai encore un problème ça m'a aider pour modifier mon fichier pour une seule fois.
A chaque fois que je veux reexécuter le programme je dois revenir a mon fichier texte et rechanger la nouvelle valeur par le nom standard "NomChamp1" pour que le code puisse excuter la procédure de modification de nouveau.
Je sais pas est ce que vous voyez ce que je veux dire.
Commenter la réponse de cs_PetiteAnge
cs_PetiteAnge 6 Messages postés jeudi 8 novembre 2007Date d'inscription 17 avril 2010 Dernière intervention - 13 mai 2009 à 14:53
0
Merci
Oui merci bien,
C'est ce que j'ai déjà fait j'ai fait des copies des fichiers standars et j'ai travaillé sur les copies.
Merci encore une fois.
Commenter la réponse de cs_PetiteAnge

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.