>SELECT question1 as ÇáÓÄÇá,question,ROUND(countof1,0) as ÖÚíÝ ,ROUND(countof2,0) as ãÞÈæá, ROUND(countof3,0) as ÌíÏ, ROUND(countof4,0) as ÌíÏÌÏÇ,ROUND(countof5,0) as ããÊÇÒ; > FROM mucur INTO CURSOR koko nofilter; > >COPY TO ("c:\dept\koko as m.a) XLS &&rong statment >>
COPY TO ("c:\dept\koko") TYPE XL52. Once you created the Excel file you can open it with automation and name the Sheet any way you want.
*-- Create Ole Automation with Excel loExcel = createobject("Excel.Application") *-- Open XLS File loExcel.application.WorkBooks.open("c:\dept\koko.XLS") loExcel.DisplayAlerts = .f. loExcel.application.application.WorkBooks(1).Sheets(1).Name = 'My Custom Name' loExcel.save()