Excel file in TsBrowse

[Jules de Pierre]

I tried to use the fExcel function as described in TsBrwose V70 notes.

It buils up a Dialog but fails in the part:

@ 66, 36 BUTTON aCtl[ 7 ] PROMPT "&Accept" OF oDlg ;
ACTION ( If( nVer == 2, ;
oBrw:ExcelOle( cFile, lActivate, aCtl[ 9 ], cTitle,, lSave ), ;
oBrw:Excel2( cFile, lActivate, aCtl[ 9 ], cTitle, lSave ) ), ;
oDlg:End(), oBrw:SetFocus() ) ;
FONT oFont SIZE 38, 12 PIXEL

Error message is:
Class: 'ARRAY' has no exported method: EXCELOLE
Args:
[ 1] = C Excelfile
[ 2] = L .T.
[ 3] = O Object
[ 4] = C No Title
[ 5] = U
[ 6] = L .F.

Or:

Class: 'ARRAY' has no exported method: EXCELOLE
Args:
[ 1] = C Excelfile
[ 2] = L .T.
[ 3] = O Object
[ 4] = C No Title
[ 5] = U
[ 6] = L .F.

depending on selecting Excel2 or ExcelOle

I included all the mentioned #Defines

Can anyone give some support?
Thanks,

Jules de Pierre

[ask]

I would use createobject .It's better than the included function .
eg:
local v_Excel:=createobject("excel.application")
v_Excel:Workbooks:Open("c:\temp\a.xls")
v_Excel:Visible:=.t.

Regards

A.S.K

I tried to use the fExcel function as described in TsBrwose V70 notes.

It buils up a Dialog but fails in the part:

@ 66, 36 BUTTON aCtl[ 7 ] PROMPT "&Accept" OF oDlg ;
ACTION ( If( nVer == 2, ;
oBrw:ExcelOle( cFile, lActivate, aCtl[ 9 ], cTitle,, lSave ), ;
oBrw:Excel2( cFile, lActivate, aCtl[ 9 ], cTitle, lSave ) ), ;
oDlg:End(), oBrw:SetFocus() ) ;
FONT oFont SIZE 38, 12 PIXEL

Error message is:
Class: 'ARRAY' has no exported method: EXCELOLE
Args:
[ 1] = C Excelfile
[ 2] = L .T.
[ 3] = O Object
[ 4] = C No Title
[ 5] = U
[ 6] = L .F.

Or:

Class: 'ARRAY' has no exported method: EXCELOLE
Args:
[ 1] = C Excelfile
[ 2] = L .T.
[ 3] = O Object
[ 4] = C No Title
[ 5] = U
[ 6] = L .F.

depending on selecting Excel2 or ExcelOle

I included all the mentioned #Defines

Can anyone give some support?
Thanks,

Jules de Pierre

[Jules de Pierre]

O.K.
Thanks A.S.K.

Jules