Consulta sobre uso de strtofile

[Marcelo Barberis]

Estimados amigos
Les consulto sobre como usar la funcion strtofile para crear un txt.
Tengo ccadena que contiene la info del txt pero esta la tengo armada con info de textbox en total uso 6 textbox de esta manera
Ccadena="solicitud de informacion"+chr(13)+;
"empresa:"+thisform.txtemp.value+chr(13)+;
"Nit empresa:"+thisform.txtempfiscal.value+chr(13)+;
"...."+....

Strtofile(ccadena,"rep.txt",lcfile)

Ahora cuando veo el txt generado m sale todo en una sola linea y yo les consultaba es cual es la forma de q m salga cada textbox en lineas separadas una debajo de otra.

Por siacaso los textbox son mas yo solo puse dos lo mismo hay un titulo y un mensaje al final.

[Hugo C.]

Intenta con algo como esto,

Ccadena="solicitud de informacion"+chr(13)+chr(10)+;

"empresa:"+thisform.txtemp.value+chr(13)+ chr(10)+ ...

Saludos

[Qsoft]

Hola,

asi:

TEXT TO ccadena TEXTMERGE

Solicitud de informacion

empresa: <<thisform.txtemp.value>>

Nit Empresa: <<thisform.txtempfiscal.value>>

ENDTEXT

= STROTOFILE(ccadena,"rep.txt",0)

es mas legible el codigo hasta para ti mismo en un futuro....

Saludos

Enrique Vasquez B.

[ArturoPC]

Para el salto de línea usa CHR(13)+CHR(10) y mejor aun como constante. Así:

#DEFINE lcEnter CHR(13)+CHR(10)

Ccadena = "solicitud de informacion" + lcEnter +;
"empresa:" + thisform.txtemp.value + lcEnter +;
"Nit empresa:" + thisform.txtempfiscal.value + lcEnter

Saludos.

Arturo PC

[HernanCano]

Marcelo:

1. ¿Te funcionó la inclusión del CHR(10) junto al CHR(13)?

2. Me gustaría que revisaras la ayuda de la función STRTOFILE(). Me parece que no está acorde a la documentación.

Nos cuentas.

[Marcelo Barberis]

Ok amigos pude hacer pruebas con la recomendacion del amigo Hugo C. m salio todo bien
En el caso de querer aumentar dos espacios hacia abajo como haria, hasta ahora solo una linea abajo se pudo

[HernanCano]

** Para agregar una línea

Ccadena="solicitud de informacion"+chr(13)+chr(10)+;

+chr(13)+ chr(10)+;

"empresa:"+thisform.txtemp.value+chr(13)+ chr(10)+ ...

** Para agregar dos líneas

Ccadena="solicitud de informacion"+chr(13)+chr(10)+;

+chr(13)+ chr(10)+;

+chr(13)+ chr(10)+;

"empresa:"+thisform.txtemp.value+chr(13)+ chr(10)+ ...

** Para agregar tres líneas

Ccadena="solicitud de informacion"+chr(13)+chr(10)+;

+chr(13)+ chr(10)+;

+chr(13)+ chr(10)+;

+chr(13)+ chr(10)+;

"empresa:"+thisform.txtemp.value+chr(13)+ chr(10)+ ...

** Para agregar cuatro líneas

Ccadena="solicitud de informacion"+chr(13)+chr(10)+;

+chr(13)+ chr(10)+;

+chr(13)+ chr(10)+;

+chr(13)+ chr(10)+;

+chr(13)+ chr(10)+;

"empresa:"+thisform.txtemp.value+chr(13)+ chr(10)+ ...

[larue...@yahoo.com]

--------------------------------------------
On Mon, 1/2/17, HernanCano <jherna...@gmail.com> wrote:

Subject: Re: [vfp] Re: Consulta sobre uso de strtofile
To: "Comunidad de Visual Foxpro en Español" <publice...@googlegroups.com>
Date: Monday, January 2, 2017, 7:02 AM

**
Para agregar una líneaCcadena="solicitud de

informacion"+chr(13)+chr(10)+;+chr(13)+
chr(10)+;"empresa:"+thisform.txtemp.value+chr(13)+
chr(10)+ ...
** Para agregar dos

líneasCcadena="solicitud de

informacion"+chr(13)+chr(10)+;+chr(13)+
chr(10)+;+chr(13)+ chr(10)+;"empresa:"+thisform.txtemp.value+chr(13)+
chr(10)+ ...
** Para agregar tres

líneasCcadena="solicitud de

informacion"+chr(13)+chr(10)+;+chr(13)+
chr(10)+;+chr(13)+ chr(10)+;+chr(13)+
chr(10)+;"empresa:"+thisform.txtemp.value+chr(13)+
chr(10)+ ...
** Para agregar cuatro

líneasCcadena="solicitud de

informacion"+chr(13)+chr(10)+;+chr(13)+
chr(10)+;+chr(13)+ chr(10)+;+chr(13)+
chr(10)+;+chr(13)+ chr(10)+;"empresa:"+thisform.txtemp.value+chr(13)+
chr(10)+ ...

El jueves, 29
de diciembre de 2016, 2:58:03 (UTC-5), Marcelo Barberis
escribió:Ok amigos pude hacer
pruebas con la recomendacion del amigo Hugo C. m salio todo
bien

En el caso de querer aumentar dos espacios hacia abajo como
haria, hasta ahora solo una linea abajo se pudo

ictoria conservatoare din martie 1871 a ingaduit marilor proprietari funciari sa-si consolideze pozitiile economice si politice si sa-si pastreze o puternica influenta in viata politica a tarii pana la primul razboi mondial. Acestia au temperat ritmul dezvoltarii si au luat masuri care sa le consolideze pozitiile. in aceasta directie s-a inscris in anul 1872 legea invoielilor agricole care prin introducerea clauzei manu militari permitea proprietarilor sa foloseasca forta armata impotriva taranilor care nu-si respectau contractele incheiate. Pe aceeasi directie de actiune se inscrie si noua lege a armatei opusa celei elaborate de liberalii-radicali si organizarea creditului funciar rural in 1873