FoxPro/Visual FoxPro - problema con Fwrite

   
Vista:

problema con Fwrite

Publicado por ovelit (126 intervenciones) el 09/04/2008 16:16:01
Saludos foxeros

estoy creando un archivo pero quiero que el siguiente texto me quede cada texto en una linea por ejemplo

archivo de prueba1
archivo de prueba2
archivo de prueba3

de la manera q lo estoy creando me que asi

archivo de prueba1archivo de prueba3 archivo de prueba3

=FWRITE(gnErrFile, 'archivo de prueba1 ')
=FWRITE(gnErrFile, 'archivo de prueb2 ')
=FWRITE(gnErrFile, 'archivo de prueb3 ')

como hago para que pase a la siguiente linea

y tambien como leer linea por linea del archivo

con el FREAD
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:problema con Fwrite

Publicado por Marcelo (171 intervenciones) el 09/04/2008 17:29:33
en vez de usar fwrite usa FPUTS() los parametros son iguales esta en la ayuda
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:problema con Fwrite

Publicado por Plinio (7771 intervenciones) el 10/04/2008 04:11:27
Tampoco esta mal usar STRTOFILE() Y FILETOSTR()
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

problema con Fread

Publicado por ovelit (126 intervenciones) el 10/04/2008 15:38:21
ok gracias marcelo y plinio ya resolvi lo del fwrite pero ahora tengo un problema con el fread que me le las tres lineas por ejemplo

archivo de prueba
archivo de prueb1
archivo de prueb2

como hago para leer linea por linea

porq necesito comparar que hay en cada linea
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:problema con Fread

Publicado por enrique (1041 intervenciones) el 10/04/2008 17:20:05
Esto es solo un ejemplo

a=fopen("tu_archivo")
x=1
do while .t.
dimen mlinea(x)
mlinea[x]=fgets(a)
if feof(a)
exit
endif
x=x+1
enddo
fclose(a)
for i=1 to alen(mlinea)
?mlinea[i]
endfor
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar