lcFile='c:\data.xls' Erase (Forceext(lcFile,'xxx')) ox=Createobject('excel.application') owb=ox.Workbooks.Open(lcFile) lcFile=Forceext(lcFile,'xxx') ox.DisplayAlerts= .F. owb.SaveAs(lcFile,39) owb.close() owb=.null. ox=.null. Release owb Release ox use myfile zap Append From (lcFile) xls Erase (lcFile)>my old way of importing data ito FXP dbf fle from excel no longer works with excel 2007. in fact they have removed the save as dbf IV in their options.