Help with array

[BlueLord]

Hy all,

I need a hint how to make a script which reade value from a file (*.csv) and create a new file with each value multiplied by x time ( in column)

Exemple:

File test.csv:

1

2

3

New file contain each value multiplied by 3 times:

1

1

1

2

2

2

3

3

3

Thanks

[BrewManNH]

Look at:

FileReadLine()

StringSplit()

For...Next

FileWriteLine or FileWrite

Read the line with filereadline, split it on the "," with StringSplit, create a loop that will write the value to a file with FileWriteLine 3 times per item in the line from the CSV file.

[wakillon]

Like this ?

$file1 = FileOpen ( "c:\test.csv", 0 )
$file2 = FileOpen ( "c:\Newtest.csv", 1 )

While 1
    $line = FileReadLine ( $file1 )
    If @error = -1 Then ExitLoop
    ConsoleWrite ( "Line read : " & $line & @Crlf )
    For $_I = 1 To 3
        FileWrite ( $file2, $line & @Crlf )
    Next
Wend

FileClose ( $file1 )
FileClose ( $file2 )
ShellExecute ( "c:\Newtest.csv" )

[BlueLord]

yes...

Thanks...

[BlueLord]

Hy,

Where i'm got wrong?

I need to reset loop $i each time loop $j is incresing.

This is the result

Loopj1

......Loopi1

......Loopi2

......Loopi3

......Loopi4

......Loopi5

Loopj2

Loopj3

Loopj4

Loopj5

Loopj6

Loopj7

Loopj8

Loopj9

Loopj10

I need loop :Loopi1 to Loopi5 to appear in Loopj2 to Loopj10

I think i need to reset FileReadLine but i don't know how

$file1 = FileOpen ( "D:\test\test.csv", 0 )
$file2 = FileOpen ( "D:\test\test1.csv", 1 )

FDHYV()

Func FDHYV()


    For $j = 1 to 10

    ConsoleWrite ( "Loop" & $j & @Crlf )

                    For $i = 1 to 5
                        $line = FileReadLine ( $file1 )
                        If @error = -1 Then ExitLoop
                        ;ConsoleWrite ( "Line read : " & $line & @Crlf )
                        FileWrite ( $file2, $line & @Crlf )
                        ConsoleWrite ( "      Loop" & $i & @Crlf )
                    Next
    Next



EndFunc

FileClose ( $file1 )
FileClose ( $file2 )
ShellExecute ( "D:\test\test1.csv")

test.csv

1

2

3

4

5

[wakillon]

Be more clear !

It will be more easy if you show the new csv file content you want...

[BlueLord]

sorry....

i have this file test.txt with

1

2

3

in new file i need to copy the content of initial file 3 times in same order

1

2

3

1

2

3

1

2

3

[hannes08]

Your last post states something different than your first post...

But ...

$s_orig = FileRead("input.csv")
$fh = FileOpen("output.csv", 1)
For $i = 1 To 5
    FileWrite($fh, $s_orig)
Next
FileClose($fh)

Okay?

Edited May 18, 2011 by Hannes123

[wakillon]

Your last post states something different than your first post...

But ...

$s_orig = FileRead("input.csv")
$fh = FileOpen("output.csv", 1)
For $i = 1 To 5
    FileWrite($fh, $s_orig)
Next
FileClose($fh)

Okay?

He said 3 times...

[BlueLord]

yes! it's ok

thanks.

three times was like exemple