AGREGAR LINEA A ARCHIVO TXT

[ozono1981]

Estimados, necesito de vuestro conocimiento

tengo un archivo .TXT con la siguiente estructura.
2155420028207000;5542;0003;00002820;00000695;0001;00001000;PAN CORRIENTE;0;00000695;00000001;00001400;00000970;00020221;00001530;192.168.0.200
2155420028207000;5542;0003;00002820;00000695;0002;00009467;TRITON NARANJA;1;00000000;00000001;00000700;00000700;00020221;00001530;192.168.0.200

y Necesito agregar una linea al final del ultimo registro...
para que quede algo asi

2155420028207000;5542;0003;00002820;00000695;0001;00001000;PAN CORRIENTE;0;00000695;00000001;00001400;00000970;00020221;00001530;192.168.0.200
2155420028207000;5542;0003;00002820;00000695;0002;00009467;TRITON NARANJA;1;00000000;00000001;00000700;00000700;00020221;00001530;192.168.0.200
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

las XXX serán para marcar el final.

Como debo hacerlo?

Muy Agradecido desde ya!!!

[Enrico Maria Giordano]

Code: Select all  Expand view  RUN

cTxt = MEMOREAD( "yourfile.txt" )
cTxt += "XXXXXXXXXXXXXXXXXXXXX"
MEMOWRIT( "yourfile.txt", cTxt )

EMG