Page 1 of 1

como puedo grabar un ficheo ascii con varias lineas

Posted: Mon Mar 05, 2007 5:36 pm
by mjcc
como puedo grabar un ficheo ascii con varias lineas

Posted: Mon Mar 05, 2007 6:48 pm
by R.F.
Asi:

cText := "primera linea"+CRLF
cText += "segunda linea"+CRLF
cText += "tercera linea"+CRLF
....
....
....
cText += "n-sima linea"+CRLF

MEMOWRIT(curdir()+"\archivo.txt",cText)

No me sirve

Posted: Tue Mar 06, 2007 9:14 am
by mjcc
Necesito saber como se usa en FWRITE, cada FWRITE que haga necesito que se escriba en una linea distinta, el problema que tengo es que escribo el texto pero no me salta de linea
He probado con el CTRLF Y DESPUES CON EL CHR(10)+CHR(12)+CHR(13), pero sigue sin saltarme de linea, me escribe todo en una linea.

Lo que quiero es escribir un fichero ASCI con los pedidos para poder enviarlo por correo electronico.

imjcc

Posted: Tue Mar 06, 2007 10:23 am
by Antonio Linares
En vez de usar FWrite(), guarda el texto en una variable en memoria y sálvala al final como te indica René

no puedo usar una variable

Posted: Tue Mar 06, 2007 11:11 am
by mjcc
no puedo usar una variable, ya el el pedido puede tener hasta 100 lineas, entonces no va a coger toda la variable en memoria y pueden ser varios pedidos de distintos clientes.

Posted: Tue Mar 06, 2007 12:10 pm
by Biel EA6DD

Code: Select all

  nHand:=fCreate('fichero.txt',FC_NORMAL)
   While !CabVta->(Eof())
        fWrite(nHand,Str(CabVta->Total))
        fWrite(nHand,'lo que sea')
        fWrite(nHand, Chr(13)+Chr(10) ) 
        CabVta->(dbSkip())
    End
fClose(nHand)