Discussion :

[Antho87]

Bonsoir,

Je galère en ce moment... impossible de savoir comment copier une phrase d'un fichier texte.

En fait, j'ai un fichier texte, avec dedans une variable qui est égale à quelques choses. Je voudrais reprendre ceux à quoi elle est égale pour l'ajouter en dessous.

Par exemple :

fichier.txt:

Variable=donnees_repetitives

En VBS je voudrais copier ce "donnees_repetitives" pour après la dernière ligne le collé.

Si qq un à des idées!! Merci par avance

[SfJ5Rpw8]

pas vraiment clair le message


pour lire un fichier texte :
Comment lire le contenu d'un fichier texte ?

pour effectuer extraction :
Comment rechercher une chaîne de caractères dans une autre ?
Comment extraire une partie d'une chaîne ?

[Antho87]

merci pour la réponse

effectivement, en relisant je vois que j'étais dans mon délire

bon déjà, je suis novice en VBscript, j'essaie d'apprendre ce langage

sinon j'avais regardé la FAQ avant de poster mais merci

le truc en fait, c'est que j'ai un fichier, admettons à c:\test.txt
ou il y a ecris : source=c:\Program Files\

je voudrais en vbs, si possible, recupérer le c:\Program Files\ afin de m'en resservir à un autre endroit dans le fichier txt

pour y écrire en dernière ligne, par ex, c:\Program Files\MonProg\

j'espère que je me suis mieux expliqué

[SfJ5Rpw8]

....
bon déjà, je suis novice en VBscript, j'essaie d'apprendre ce langage
...

ok ben une chose après l'autre essai donc de lire ton fichier ... la te donne déjà une réponse....

[Antho87]

bon j'ai essayé ce code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
Const ForReading = 1, ForWriting = 2
Dim oFso, f, temps
 
Set oFso = CreateObject("Scripting.FileSystemObject")
Set f = oFso.OpenTextFile("c:\test.txt", ForReading)
Texte1.Text = f.ReadAll
pos = InStr(1, Texte1.Text, "source=")
 
pos = pos+8
 
temps = Mid(Texte1.Text,pos,2)
f.Close

je suis arrivé à faire ce que je voulais
maintenant faut que j'arrive à l'écrire...

[SfJ5Rpw8]

Salut, ..

Je vois que tu as essayé par toi même et que tu est arrivé à quelque chose..

difficile de te donner une réponse avec un "code terminé" lorsqu'on n'as pas toutes les infos (en plus c'est pas le but)..

Tu as choisi la solution de lire tout le texte d'une seule commande... pas de problème..

à tu penser à vérifier si tu dois gérer le cas où ta chaine se répète plusieurs fois dans le fichier par exemple..

Pour extraire tes caractères tu utilise Mid et tu extrait 2 caractères ce nombre de caractères n'est pas le même que lors de l'énoncé de ta question .. .....


Pour finir pour l'écriture dans un fichier .. sans plus de précision je ne peu à nouveau faire autre chose que te renvoyer vers la ... Comment écrire dans un fichier texte ?

[Antho87]

Merci pour l'aide mais finalement, en grattant par moi même je suis arrivé à mon but , comme quoi

sinon, je dois dire que la FAQ en VBScript et d'autres dont je me suis déjà aidé sont vraiment très bien faites!!

a bientôt, si je suis coincé