Consulta Escribir en un archivo de Texto plano

[ttw]

Buenas tardes, tengo un problema, no se como escribir datos en un archivo de texto,
ya que lo que necesito es escribir datos a este archivo y no se como,
estoy usando el VFP 9.0 gracias

[Walter R. Ojeda Valiente]

Utiliza la función STRTOFILE()

Ejemplo1:
=STRTOFILE("Este es el texto que quiero escribir", "PRUEBA1.TXT")

Ejemplo2:
lcTexto = "Aquí está mi texto para probar"
=STRTOFILE(lcTexto, "PRUEBA2.TXT")

Saludos.

Walter.

---

Date: Wed, 24 Oct 2012 13:48:55 -0700
From: rorme...@gmail.com
To: publice...@googlegroups.com
Subject: [vfp] Consulta Escribir en un archivo de Texto plano

Buenas tardes, tengo un problema, no se como escribir datos en un archivo de texto,
ya que lo que necesito es escribir datos a este archivo y no se como,
estoy usando el VFP 9.0 gracias

--
 
 
 

[ttw]

y si le quiero hacer un saldo de linea para que lo siguiente que escriba lo realize en otra linea como puedo hacer?

[Walter R. Ojeda Valiente]

Agrégale CHR(10) + CHR(13) a cada línea del texto que enviarás al archivo.

Saludos.

Walter.

---

Date: Wed, 24 Oct 2012 13:57:50 -0700
From: rorme...@gmail.com
To: publice...@googlegroups.com
Subject: [vfp] Re: Consulta Escribir en un archivo de Texto plano

--
 
 
 

[Edgar Acevedo]

Eso es lo bonito de VFP:  te permite hacer una misma cosa de diferentes formas.  Aparte de la forma que te ha indicado Walter, puedes hacer archivos plajo utilizando funciones de "bajo nivel".  Para ello estudia las funciones FCREATE(), FOPEN(), FWRITE(), FREAD(), FPUTS(), FGETS(), FCLOSE()

También puedes enviar una tabla hacia un archivo plano con el comando:

COPY TO  Plain.Txt   SDF

O hacer un archivo plano delimitado por comas:

COPY TO  Plain.Txt   CSV

En fin, hay muchas formas para diferentes objetivos.

Salu2,


Edgar

--
 
 
 

[Víctor Hugo Espínola Domínguez]

Otra forma es con TEXTMERGE:

lcHoy = 'Hoy es: '

SET TEXTMERGE TO ArchivoTexto

SET TEXTMERGE ON

\<<lcHoy>>

\\<<DATE( )>>

\La hora es:

\\ <<TIME( )>>

SET TEXTMERGE OFF

SET TEXTMERGE TO

MODIFY FILE ArchivoTexto.txt

Saludos.

Víctor.

--
 
 
 

[ArturoPC]

Y otra es el Windows Scripting

 

LOCAL loScript, loFile
loScript = CREATEOBJECT("Scripting.FileSystemObject")
loFile = loScript.CreateTextFile("miArchivo.txt",.T.)
loFile.Write("Esta es la primera línea")
loFile.WriteBlankLines(1)   && salto de línea
loFile.Write("Esta es la segunda línea")
loFile.WriteBlankLines(1) && salto de línea
RELEASE loScript, loFile

Slds,

Arturo PC

[ArturoPC]

Y una más, con SET DEVICE y @SAY (esta es del recuerdo)

 

SET DEVICE TO FILE ("miArchivo.txt")
@0,0 SAY "Esta es la primera línea"

@1,0 SAY "Esta es la segunda línea"
SET DEVICE TO SCREEN

[Luis Maria Guayan]

Mira la ayuda de la función STRTOFILE()

Luis María Guayán
Tucumán, Argentina
_________________________
http://www.PortalFox.com
Nada corre como un zorro
_________________________

--
 
 
 

[Juan C. Rivera Rosel]

Amigo aki te mando mi codigo, espero que te sirva.
pd. no soy como otros que te mandan a una direccion o a otra o q t digan investiga tal cosa etc.
     *para que guardarnos codigo si este lenguaje algun dia llegara a su fin.

nomfile3='archivito.txt'
cubic=getdir('c:\','Ubicacion')
lcTextFile = FCREATE(cubic+nomfile3)
********************************
sele cPDTDatosG
go top
for i = 1 to reccount('cPDTDatosG')
    sele cPDTDatosG
    go i
    scatter memvar memo
    FPUTS(lcTextFile, m.primero) && Writes string to the text file.
endfor
FCLOSE(lcTextFile)

Ing. Juan Carlos Rivera Rosel
(E) Area Informatica - Universidad de Huanuco -Perú
(062)51-8301 anexo 118

 

 

---

Date: Wed, 24 Oct 2012 19:32:41 -0300
From: luism...@gmail.com
To: publice...@googlegroups.com
Subject: Re: [vfp] Consulta Escribir en un archivo de Texto plano

--
 
 
 

[Luis Maria Guayan]

???????

Luis María Guayán
Tucumán, Argentina
_________________________
http://www.PortalFox.com
Nada corre como un zorro
_________________________

--
 
 
 

[Miguel Canchas]

Ptm y todavía es mi paisano….. jajajajajaja

 

 

MK

(062)51-8301 anexo 118

 

 

 

---

Date: Wed, 24 Oct 2012 19:32:41 -0300
From: luism...@gmail.com
To: publice...@googlegroups.com
Subject: Re: [vfp] Consulta Escribir en un archivo de Texto plano

Mira la ayuda de la función STRTOFILE()

Luis María Guayán
Tucumán, Argentina
_________________________
http://www.PortalFox.com
Nada corre como un zorro
_________________________

El 24/10/2012 17:48, ttw escribió:

Buenas tardes, tengo un problema, no se como escribir datos en un archivo de texto,
ya que lo que necesito es escribir datos a este archivo y no se como,
estoy usando el VFP 9.0 gracias
--
 
 
 

--
 
 
 

--
 
 
 

 

--
 
 
 

[Juan C. Rivera Rosel]

??????

Ing. Juan Carlos Rivera Rosel
(E) Area Informatica - Universidad de Huanuco -Perú

(062)51-8301 anexo 118

 

 

---

Subject: RE: [vfp] Consulta Escribir en un archivo de Texto plano
Date: Wed, 24 Oct 2012 18:05:20 -0500
From: mcan...@ximesa.com
To: publice...@googlegroups.com

--
 
 
 

[ArturoPC]

Léase, si tu pregunta era en el foro de C#, ahí sí vale mandar un link o a investigar... Jajajajaja.

 

Por cierto, desde hace tiempo planeo una escapada a Huánuco con mi mujer y hasta ahora nada de nada, ya me toca un buen descanso!!!!!!!!

 

Arturo PC.

[Juan C. Rivera Rosel]

Estaremos atentos a tu llegada, amigo.

Ing. Juan Carlos Rivera Rosel
(E) Area Informatica - Universidad de Huanuco -Perú
(062)51-8301 anexo 118

 

 

---

Date: Wed, 24 Oct 2012 16:11:12 -0700
From: apa...@gmail.com

--
 
 
 

[Alex C.]

Gracias... muy buena la información :D