Sets the value of a property of an OLE2 Automation Object.
PROCEDURE OLE2.Set_Property
(object obj_type,
property VARCHAR2,
value NUMBER,
Arglist List_Type := 0);
PROCEDURE OLE2.Set_Property
(object obj_type,
property VARCHAR2,
value VARCHAR2,
Arglist List_Type := 0);
Parameter | Description |
---|---|
object | An OLE2 Automation Object. |
property | The name of a property in an OLE2 Automation Object. |
value | A property value. |
Arglist | The name of an argument List assigned to the OLE2.Create_Arglist Function. |
/*
**Set properties for the OLE2 object `Excel.Application'.
*/
application:=OLE2.CREATE_OBJ('Excel.Application');
OLE2.Set_Property(application,'Visible', 'True');
workbooks:=OLE2.INVOKE_OBJ(application, 'Workbooks');
workbook:=OLE2.INVOKE_OBJ(workbooks,'Add');
worksheets:=OLE2.INVOKE_OBJ(workbook, 'Worksheets');
worksheet:=OLE2.INVOKE_OBJ(worksheets,'Add');
args:=OLE2.CREATE_ARGLIST;
OLE2.ADD_ARG(args, 4);
OLE2.ADD_ARG(args, 2);
cell:=OLE2.Invoke_Obj(worksheet, 'Cells', args);
OLE2.DESTROY_ARGLIST(args);
OLE2.Set_Property(cell, 'Value', 'Hello Excel!');