|
Puedes hacer los siguiente:
Select * from clientes;
into cursor Tablaclientes
if _Tally>0 Then
Select Tablaclientes
gcDelimName = ALIAS( ) + '.XLS'
gcDelimFile = PUTFILE('Archivo excel:', gcDelimName, 'XLS')
IF !EMPTY(gcDelimFile)
COPY TO (gcDelimFile) TYPE XL5 && Crea archivo EXCEL
ENDIF
|
