|
|
Re: want to provide a link to an excel sheet in my form [message #86159 is a reply to message #86127] |
Sun, 05 September 2004 06:39 |
fanni
Messages: 96 Registered: March 2004
|
Member |
|
|
Hi Giri
use this code to use OLE.
place a button on your form and paste this code on its when-button-pressed trigger
i wish it will work fine
Open excel report on click of pusg button
DECLARE
AppID PLS_INTEGER;
v_PATH VARCHAR2(110);
v_SHEETPATH VARCHAR2(200);
application ole2.obj_type;
workbooks ole2.obj_type;
workbook ole2.obj_type;
args ole2.list_type;
BEGIN
v_PATH :=get_application_property(current_form);
v_SHEETPATH := SUBSTR(v_PATH,1,INSTR(v_PATH,'',-1))||'SCHEDULE.XLS';
application:= ole2.create_obj('Excel.Application');
OLE2.SET_PROPERTY(application,'Visible',1);
workbooks := ole2.get_obj_property(application, 'Workbooks');
args:= ole2.create_arglist;
ole2.add_arg(args,v_SHEETPATH);
workbook := ole2.invoke_obj(workbooks, 'Open', args);
EXCEPTION WHEN OTHERS THEN
MESSAGE(sqlerrm);
END;
|
|
|