>>Hi All,
>>
>>I am trying to use VFPCOM with Excel 97. (VFP 6.0+ Service Pack 3)
>>My (actually it is Cetin's :) test program works on Windows 2000 + Office 2000, but on Win 95/98 (DCOM95/98) + Office 97 + Service Packs 1 and 2 it gives me "OLE error code 0x80004002 No such interface supported."
>>ExportEvents() does not export anything.
>>Anybody know some magical trick (even Evil one :) to make it work (some DLL or whatever) or it just doesn't work with Office 97?
>>The sample form shipped with VFPCOM works just fine, but that with IE...
>>
>
>Something went wrong, because with Excel97/Win98 and VFPCOM, I did the following:
>
>ox=CREATEOBJ('Excel.Application')
>oy=CREATEOBJ('VFPCOM.COMUTIL')
>oy.BindEvents(ox,'ExcelApp.PRG')

Correction: oy.ExportEvents(ox,'ExcelApp.PRG')

>
>resulted in:
>
>

DEFINE CLASS AppEvents AS custom
>
>
>	PROCEDURE NewWorkbook(Wb)
>	* Add user code here
>	ENDPROC
>
>
>	PROCEDURE SheetActivate(Sh)
>	* Add user code here
>	ENDPROC
>
>
>	PROCEDURE SheetBeforeDoubleClick(Sh,Target,Cancel)
>	* Add user code here
>	ENDPROC
>
>
>	PROCEDURE SheetBeforeRightClick(Sh,Target,Cancel)
>	* Add user code here
>	ENDPROC
>
>
>	PROCEDURE SheetCalculate(Sh)
>	* Add user code here
>	ENDPROC
>
>
>	PROCEDURE SheetChange(Sh,Target)
>	* Add user code here
>	ENDPROC
>
>
>	PROCEDURE SheetDeactivate(Sh)
>	* Add user code here
>	ENDPROC
>
>
>	PROCEDURE SheetSelectionChange(Sh,Target)
>	* Add user code here
>	ENDPROC
>
>
>	PROCEDURE WindowActivate(Wb,Wn)
>	* Add user code here
>	ENDPROC
>
>
>	PROCEDURE WindowDeactivate(Wb,Wn)
>	* Add user code here
>	ENDPROC
>
>
>	PROCEDURE WindowResize(Wb,Wn)
>	* Add user code here
>	ENDPROC
>
>
>	PROCEDURE WorkbookActivate(Wb)
>	* Add user code here
>	ENDPROC
>
>
>	PROCEDURE WorkbookAddinInstall(Wb)
>	* Add user code here
>	ENDPROC
>
>
>	PROCEDURE WorkbookAddinUninstall(Wb)
>	* Add user code here
>	ENDPROC
>
>
>	PROCEDURE WorkbookBeforeClose(Wb,Cancel)
>	* Add user code here
>	ENDPROC
>
>
>	PROCEDURE WorkbookBeforePrint(Wb,Cancel)
>	* Add user code here
>	ENDPROC
>
>
>	PROCEDURE WorkbookBeforeSave(Wb,SaveAsUI,Cancel)
>	* Add user code here
>	ENDPROC
>
>
>	PROCEDURE WorkbookDeactivate(Wb)
>	* Add user code here
>	ENDPROC
>
>
>	PROCEDURE WorkbookNewSheet(Wb,Sh)
>	* Add user code here
>	ENDPROC
>
>
>	PROCEDURE WorkbookOpen(Wb)
>	* Add user code here
>	ENDPROC
>
>
>ENDDEFINE
>

>
>>Nick