hi all,

any help idea ,to store(convert) this data via vfp code to 3 sheets at my xls.book
as.
"ADSL 1 " and all fields at one sheet1
"B ISDN " ----------------------sheet2
"LL " ----------------------sheet3

Select * from am ;
  where INLIST( val(char3), 100, 201, 202, 203 );
 and ( inList( upper(allt(telno)), "ADSL 1", "B ISDN  ") or upper(left(telno,2)) = "LL" );
   into table am2 nofilter
  

CLOSE all
USE am2

gcDelimName = ALIAS( ) + '.xls'

gcDelimFile = PUTFILE('excel_file:', gcDelimName, 'xls')

IF EMPTY(gcDelimFile)  && Esc pressed

   CANCEL

ENDIF

COPY TO (gcDelimFile) FIELDS char1 ,char3 , char7, char8, char9, char13 ,telno, char26, char27, char28   XLS

DROP TABLE am2 

thanks.