problema urgente por favor

[mjcc]

Ya he puesto varias veces el mensaje en el foro
necesito generar un fichero ascii con los siguientes datos. Mi intencion es generar un fichero asci con los datos de los pedidos y enviarlos por correo electronico.

El formato de de ser el siguiente
==========================================
Articulo Nombre del articulo Cantidad
==========================================
??????? ????????????????????????????????????? ????????????
??????? ????????????????????????????????????? ????????????
??????? ????????????????????????????????????? ????????????
y asi sucesivamente, he probado con el FWRITE(xxx,texto+chr(10)+chr(13))
pero no me realiza el salto de linea en el fichero ASCII y no se como solucionar este problema de otra forma.


GRACIAS
imjcc@mjccsl.com

[Antonio Linares]

Este ejemplo funciona correctamente:

Code: Select all

#include "FWCE.ch"

function Main()

   local nHand := fCreate('fichero.txt') 

   fWrite(nHand, "Probando" + Chr(13)+Chr(10) ) 
   fWrite(nHand, "Probando" + Chr(13)+Chr(10) ) 
   fWrite(nHand, "Probando" + Chr(13)+Chr(10) ) 
   fWrite(nHand, "Probando" + Chr(13)+Chr(10) ) 
   fWrite(nHand, "Probando" + Chr(13)+Chr(10) ) 
   fWrite(nHand, "Probando" + Chr(13)+Chr(10) ) 
   fWrite(nHand, "Probando" + Chr(13)+Chr(10) ) 
   fClose(nHand)

   MsgInfo( MemoRead( "fichero.txt" ) )

return nil

[R.F.]

Generado con Memowrit() y tambien funciona

[Biel EA6DD]

FWRITE(xxx,texto+chr(10)+chr(13))

Debe ser Chr(13)+Chr(10), solo eso hace que el Bloc de notas te visualice el contenido en una sola linea.

Tanto lo que te comenta Rene, como Antonio, como yo mismo en el anterior hilo, funcina 100% seguro.

[mjcc]

gracias.