SaveAs Excel 5.0 & Excel 97 format

[Croney69]

Hi all,

I have been searching all over to resolve this problem and cannot find any help.

I have creates an Excel Object in VFP to access a Excel file but VFP dose only reads Excel 5.0 format. So I then save the excel file to the new format.

This works well I get a popup which the user has to select "No" for the Excel to save in the required format.

This is the message:
Saving this workbook's VBA project in Excel 5.0/95 file format requires a component that is not currently installed. Do you want to save in the latest Excel format? ...etc

As I said, the answer will be "No" but what parameter would I use to do this.

SCRIPT:

x=GETFILE("xlsm","Select Agent excel file","Select")
oExcel=CREATEOBJECT("Excel.Application")
oExcel.EnableEvents=.f.
oExcel.workbooks.open(x)
SET SAFETY OFF
NewXLS="L:\ExcelToSun\VFP\new.xls"

IF FILE(NewXLS)
DELETE FILE &NewXLS
ENDIF

SET SAFETY OFF

oExcel.WorkBooks(1).SaveAs(NewXLS,39) &&& Save the excel file in a Microsoft Excel 5.0/95 Workbook format
oExcel.quit()

Thanks very much for your help in advance.