Quiero leer un archivo con muchas líneas y pasar todo su contenido a otro archivo, pero colocando tres líneas unidas del primer archivo en cada línea del segundo archivo.
Es decir, si el primer archivo tiene 300 líneas, el segundo archivo tendrá 100.
Código: Seleccionar todo
#include <File.au3>
Local $sArchivo1
$sArchivo1 = "archivo1.txt"
Local $sArchivo2
$sArchivo2 = "archivo2.txt"
Local $sTresLineasEnUna
FileOpen($sArchivo1,0)
FileOpen($sArchivo2,2)
For $i In ( _FileCountLines($sArchivo1) / 3 )
For $a = ( ( $i - 1 ) * 3 ) + 1 ) To ( $i * 3 )
$sTresLineasEnUna = $sTresLineasEnUna & FileReadLine($sArchivo1, $a)
Next
FileWriteLine($sArchivo2, $sTresLineasEnUna)
Next
FileClose($sArchivo2)
FileClose($sArchivo1)
Solo faltaba un paréntesis, pero ahora tengo otro error:error: syntax error
For $a = ( ( $i - 1 ) * 3 ) + 1 )
Código: Seleccionar todo
Variable must be of type "Object".:
For $i In ( _FileCountLines($sArchivo1) / 3 )