Append to line in file

[Zefed]

Hello!

at once - sorry for my bad engilshi.. is my hmm.. second language.

Ok, i have a problem: 

I must append to line in txt

i.e (google translator ) 

i have in file: 

word

word

word

and now i wants append:   (word1 form input)

word1 word

word1 word

word1 word 

I hope it is well described (google translator) 

Im try add to array but still do not know how to do it

 

at once

at once

at once

at once 

 

at once

 

at once

 

 

[jdelaney]

how about

#include <File.au3>
_FileCreate("test.txt")
FileWrite("test.txt","word1" & @CRLF & "word1" & @CRLF & "word1" & @CRLF )
Local $a[1]
_FileReadToArray("test.txt",$a)
For $i = 1 To UBound($a)-1
    $a[$i] &= " word"
Next
_FileWriteFromArray("test.txt",$a,1)
ConsoleWrite(FileRead("test.txt") & @CRLF)

Edited March 26, 2015 by jdelaney

[Malkey]

Using the word "append to line" insinuates hanging something onto the end of the line.
Your example shows prepending to the lines. That is, adding to the beginning of each line.

So, here is an example of adding "word1 " to the beginning of each line in a file.

#include <Array.au3>
#include <File.au3>

_FileCreate("test.txt")
FileWrite("test.txt", "word" & @CRLF & "word" & @CRLF & "word")
Local $a[1]
_FileReadToArray("test.txt", $a)
_ArrayDisplay($a)
For $i = 1 To UBound($a) - 1
    $a[$i] = "word1 " &  $a[$i] ; Prepend "word1 " to each array element.
Next
_FileWriteFromArray("test.txt", $a, 1)
ConsoleWrite(FileRead("test.txt") & @CRLF)

[jdelaney]

Whoops, good catch.

[iamtheky]

or he wants "1 word" appended...

[SadBunny]

Don't think so:

 

and now i wants append:   (word1 form input)

 

Looks like he means prepending/prefixing "word1 " indeed, as in "word1 <form input>"

[Zefed]

 

Using the word "append to line" insinuates hanging something onto the end of the line.

Your example shows prepending to the lines. That is, adding to the beginning of each line.

So, here is an example of adding "word1 " to the beginning of each line in a file.

#include <Array.au3>
#include <File.au3>

_FileCreate("test.txt")
FileWrite("test.txt", "word" & @CRLF & "word" & @CRLF & "word")
Local $a[1]
_FileReadToArray("test.txt", $a)
_ArrayDisplay($a)
For $i = 1 To UBound($a) - 1
    $a[$i] = "word1 " &  $a[$i] ; Prepend "word1 " to each array element.
Next
_FileWriteFromArray("test.txt", $a, 1)
ConsoleWrite(FileRead("test.txt") & @CRLF)

Dude you are the best! Thenks all!