FiveTech Support Forums

Can anyone tell me how to insert a new row using OLE?

Thanks Enrico

what may I do, I can't open application Excell but write sheet to file

thanks You
I want to open two folder in one sheet

Enrico, could you please help me on that.
Thanks in advance
Otto
Unresolved external '_HB_FUN_CREATEOBJECT' referenced from C:\FWH\SAMPLES

If you are using Harbour you have to use TOleAuto():New() instead of CreateObject().

EMG

Hello Enrico,
Thank you for your help. But I can’t get it working.

I have a original FWH installation 7.11 with original FIVEWIN harbour.

I get this error. The only other file with TOleAuto in Fivewin\samples
is mscomm32.prg. If you compile this file you have the same error.

Error: Unresolved external '_HB_FUN_TOLEAUTO' referenced from C:\FWH\SAMPLES\MSC
OMM32.OBJ

Thanks in advance
Otto

FUNCTION MAIN()
// LOCAL oExcel := CREATEOBJECT( "Excel.Application" )
LOCAL oExcel := TOleAuto( ):New( "Excel.Application" )
LOCAL oWorkbook := oExcel:Workbooks:Add()
LOCAL oSheet := oExcel:ActiveSheet

oSheet:Cells( 1, 1 ):Value = "Test 1A"
oSheet:Cells( 1, 2 ):Value = "Test 1B"
oSheet:Cells( 2, 1 ):Value = "Test 3A"
oSheet:Cells( 2, 2 ):Value = "Test 3B"
oSheet:Rows( 2 ):Insert()
oSheet:Cells( 2, 1 ):Value = "Test 2A"
oSheet:Cells( 2, 2 ):Value = "Test 2B"
oExcel:Visible = .T.

//oSheet:SaveAs( "c:\xharbour\newfile.xls" )
//oExcel:Quit()

RETURN NIL

I forgot to say that you need hbole.lib or hbwin32.lib.

EMG

Otto,

You have to link HbWin32.lib from Harbour

Where can I download HbWin32.lib ?
Regards,
Otto

Otto,

http://rapidshare.com/files/72966698/hbwin32.lib.html

Have you checked if it is included in Harbour libs directory ?