no funciona fwrite
Publicado por Rosy (38 intervenciones) el 06/07/2013 01:51:03
Hola, necesito crear un archivo plano y usé la funcion fwrite, sin embargo, cuando posteriormente lo edito, me queda todo en una sola linea y yo necesito que quede una linea debajo de la otra. Usé los caracteres de escape LF y retorno de carro pero aun asi no funciona.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
# INCLUDE 'FILEIO.CH'
campo01 := "primer campo"
campo02 := "ojola ojala"
campo03 := "1111111"
campo04 := "listo"
nFile := FCREATE("sal.csv", FC_NORMAL)
for i := 1 to 5
cadena := strzero(i,1) + ";" + campo01 + ";" + campo02+";"+ campo03 + ";" + campo04 + chr(10)+chr(13)
FWRITE(nFile, cadena, 40 )
NEXT
FCLOSE(nFile)
Valora esta pregunta
0