TEXT - ENDTEXT
Publicado por carlos (52 intervenciones) el 23/04/2004 18:30:49
Hola mi situación es que genero un txt con TEXT - ENDTEXT pero cuando me salva el archivo me deja la primer linea en blanco, quisiera saber como la elimino. Aqui envio el codigo que estoy usando.
SET TEXTMERGE ON NOSHOW REPTEXT ADDITIVE 4
STORE FCREATE('c:\tmp\Archivo.txt') TO _TEXT
IF _TEXT = -1 && No puede crear archivo de bajo nivel entonces termina
WAIT WINDOW 'No puede crear archivo de salida. Presione una tecla para salir.'
CANCEL
ENDIF
TEXT
<?xml version = "1.0" encoding="ISO-8859-1" ?>
<ROOT>
<ROWSET_YSKDATMEN>
<ROWSET_YSKENTDEP>
ENDTEXT
FCLOSE(_TEXT)
Return
SET TEXTMERGE ON NOSHOW REPTEXT ADDITIVE 4
STORE FCREATE('c:\tmp\Archivo.txt') TO _TEXT
IF _TEXT = -1 && No puede crear archivo de bajo nivel entonces termina
WAIT WINDOW 'No puede crear archivo de salida. Presione una tecla para salir.'
CANCEL
ENDIF
TEXT
<?xml version = "1.0" encoding="ISO-8859-1" ?>
<ROOT>
<ROWSET_YSKDATMEN>
<ROWSET_YSKENTDEP>
ENDTEXT
FCLOSE(_TEXT)
Return
Valora esta pregunta
![Me gusta: Está pregunta es útil y esta clara Me gusta: Está pregunta es útil y esta clara](/img/img.png?11.51)
![NO me gusta: Está pregunta no esta clara o no es útil No me gusta: Está pregunta no esta clara o no es útil](/img/img.png?11.51)
0