Hola amigos
Tengo varios archivos de texto y con COPY los junto en un solo archivo
Asi:
C:>COPY C:\SISTEMAS\DATOS*.TXT C:\SISTEMAS\DATOS\LLAMADAS.TXT
El comando lo tengo en un .BAT
Se puede hacer con FIVEWIN? C贸mo?
Gracias por la ayuda
Saludos
Adhemar
Holas..
..Simple.. llama al mismo bat desde dentro de FW, pero no muestres la window con :
WINEXEC( "mibat.bat", 0 )
Espero te sirva
Desde Chile
Adolfo
Gracias Adolfo
Eso es lo que hago, lo que queria era evitar el .BAT y si se podia con comandos de XHarbour-FiveWin
Lo he solucionado con una BASE y hago APPEND FROM, todos los archivos de Texto.
Saludos
Adhemar
UnirFicheros('C:\SISTEMAS\DATOS\*.TXT','C:\SISTEMAS\DATOS\LLAMADAS.TXT')
//-------------------------------------------------
STATIC FUNCTION UnirFicheros(cOrigen,cDestino)
聽 聽LOCAL aFile,hFile,cPath
聽 聽aFile:=Directory(cOrigen)
聽 聽cPath:=cFilePath( cOrigen )
聽 聽IF Len(aFile)>1
聽 聽 聽 hFile:=FCreate(cDestino)
聽 聽 聽 IF hFile!=-1
聽 聽 聽 聽 聽AEval( aFile, {|a| FWrite(hFile, MemoRead( cPath+a[1] )) } )
聽 聽 聽 聽 聽FClose(hFile)
聽 聽 聽ENDIF
聽 聽ENDIF
RETURN NILGracias Biel
Funciona perfecto, eso es lo que necesitaba.
Saludos
Adhemar