Can I Use OLE2 to export Excel without having excel?

Question

Dear all,
Can i use CLIENT_OLE2 to export from a form to an excel sheet without having the Microsoft excel installed on the AS (Application server)?
Thanks
$hOoO$h

Answer 1

Dear SHo0o0sh;
yes u can run it on client side but the client must have Microsoft office
like this :
PROCEDURE init_excel (application in out client_ole2.obj_type ,
workbooks in out client_ole2.obj_type ,
workbook in out client_ole2.obj_type ,
worksheets in out client_ole2.obj_type ,
worksheet in out client_ole2.obj_type )IS
args client_ole2.list_type;
begin
application:=client_ole2.create_obj('EXCEL.APPLICATION');
workbooks:=client_ole2.get_obj_property(application,'workbooks');
args:=client_ole2.create_arglist;
client_ole2.add_arg(args,1);
workbook:=client_ole2.get_obj_property(workbooks,'add',args);
client_ole2.destroy_arglist(args);
worksheets:=client_ole2.get_obj_property(workbook,'worksheets');
worksheet:=client_ole2.get_obj_property(worksheets,'add');
write_cell(worksheet , cell , 1 ,1 ,'your data');
write_cell(worksheet , cell , 1 ,2 ,'your data');
release_excel (application,
workbooks,
workbook ,
worksheets ,
worksheet);
end;
PROCEDURE write_cell (worksheet client_ole2.obj_type,
cell in out client_ole2.obj_type,
x number , y number , text varchar2) IS
args client_ole2.list_type;
BEGIN
args:=client_ole2.create_arglist;
client_ole2.add_arg(args,x);
client_ole2.add_arg(args,y);
cell:=client_ole2.get_obj_property(worksheet,'cells',args);
client_ole2.destroy_arglist(args);
client_ole2.set_property(cell,'value',text);
client_ole2.release_obj(cell);
END;
Hope it works.
Regards
Reda El Mitwally