Re: OLE2- Package experience

From: Lang Richard <richard_at_dse.it>
Date: 1996/04/09
Message-ID: <316A7E99.1070_at_dse.it>#1/1


It helps. Thanks.
Maybe because i don't really know how to handle objects, methods, propertys and propertys that return objects and so, you can help me another time:

The last time i wrote only generally.
The example you made is similare to the
example that gives DEV2K
(I discovered this example only after have writen the news)

Now I make a data transfer between Forms and an embedded Excel5-File. The matter is, i cannot execute the makros in this file. Or sayed better, the execution of the procedure has no effect.

Any suggestions?

Here the procedure:

Procedure Makro (Dig PLS_INTEGER, Name varchar2) is

--Dig is the Handle that points on the embedded OLE-Object
--(Get_interface_pointer)
--Name is the name of the excel-macro to execute.

  app PLS_INTEGER;
  alist OLE2.LIST_TYPE;

Begin
-- Get the handle on the application: syntax is application.execute macro:="File!Macroname"   BEGIN
    app:=OLE2.get_obj_property(dig, 'Application');    exception when others then message('Get.App failure:');   END;   aList:=OLE2.CREATE_ARGLIST;
  OLE2.ADD_ARG(aList, 'TARIF.XLS!'||Name);   BEGIN
    OLE2.Invoke (app, 'Execute', aList);    exception when others then message('Run failure:');   END;
  OLE2.DESTROY_ARGLIST(aList);

  OLE2.RELEASE_OBJ(app);
End;

-- 
Lang Richard                 EMAIL: Richard.Lang_at_dse.it
DSE	                      or  : richard_at_calico.dse.it
39100 Bozen
Galvanistr 33                   Tel.: 0039 471 555 711

(BZ) ITALY
Privat:---> Lang Richard ================ 39019 Dorf Tirol Ruprechtweg. 4 Tel.: +39 473 565 149 (BZ) ITALY
Received on Tue Apr 09 1996 - 00:00:00 CEST

Original text of this message