Saya udah coba pake OLE2 n itu ok u dev6i utk 10g saya belum coba karena hrs pake web_show_document(....). Tapi kalo ga pingin susah n ga mau cape pake aja program rep2excel.exe dpt didownload di http://www.lv2000.com pokoknya top bgt bisa u dev6i or yang lebih tinggi
Agus Sukayat l IT Officer | PT Global Informasi Bermutu | Wisma Indovision, level 17 | Jalan Raya Panjang Z/III | Jakarta 11520 Indonesia | tel: +62-21-582-8555 ext. 1740| fax: +62-21-582-4414 -----Original Message----- From: [email protected] [mailto:[EMAIL PROTECTED] On Behalf Of [EMAIL PROTECTED] Sent: Monday, September 19, 2005 10:26 AM To: [email protected] Subject: Re: [indo-oracle] Digest Number 1217 Thanks Mr. Agus, tapi pada saat saya coba cell.first itu kok error yah.. Kalau boleh saya tanya lagi nih.. bagaimana cara membuka file excel tertentu menggunakan ole2, bukan membuat object excel baru? thanks Regards, iman --- [email protected] wrote: > ------------------------ Yahoo! Groups Sponsor > --------------------~--> > Fair play? Video games influencing politics. Click > and talk back! > http://us.click.yahoo.com/T8sf5C/tzNLAA/TtwFAA/PhFolB/TM > --------------------------------------------------------------------~-> > > > There are 3 messages in this issue. > > Topics in this digest: > > 1. Re: Compile Package Error > From: Edy Sumaryoto > <[EMAIL PROTECTED]> > 2. Report to Excell > From: "Agus Sukayat" > <[EMAIL PROTECTED]> > 3. Re: Compile Package Error > From: Privida Kristiono > <[EMAIL PROTECTED]> > > > ________________________________________________________________________ > ________________________________________________________________________ > > Message: 1 > Date: Fri, 16 Sep 2005 10:04:31 +0700 > From: Edy Sumaryoto <[EMAIL PROTECTED]> > Subject: Re: Compile Package Error > > Bisa errornya lebih detail ? > Misal ORA..... > > On 9/15/05, adhika_rexuss <[EMAIL PROTECTED]> > wrote: > > > > Hi semua, > > > > saya ada pertanyaan nih. > > sebelumnya, ini info oracle saya > > > > Oracle Version 10g (10.1.0.2 <http://10.1.0.2>) > standard edition > > Server : Windows Server 2003 Standard Edition > > > > begini masalahnya > > saya mau coba compile package2 dari hasil import > yang error. > > nah sewaktu sedang coba compile, > > ada satu package yang kebetulan saya butuh disaat > pembuatan view, dia > > error. > > > > errornya kira kira gini: > > <namaTable>.<namaColumn> must be declared > > > > saya udah coba di TOAD dan di SQLPLUS juga untuk > compile package ini. > > tapi hasil dari keduanya tetap sama. > > kira kira apa lagi yang bisa saya lakukan yah ? > > ada kemungkinan dia dependent dengan package lain > ga ? kalo iya, > > gimana detect nya? > > > > sebelum dan sesudahnya terima kasih banyak dan > mohon jawabannya. > > > > > > > > > > regards > > > > > > Adhika > > > > > > > > > > > > > > > > -- > > -----------I.N.D.O - O.R.A.C.L.E--------------- > > Keluar: [EMAIL PROTECTED] > > Website: http://indo-oracle.lizt.org (NEW) > > ----------------------------------------------- > > > > Bergabung dengan Indonesia Thin Client User > Groups, > > Terminal Server, Citrix, New Moon Caneveral, di: > > http://indo-thin.vze.com > > Yahoo! Groups Links > > > > > > > > > > > > > > > > > > > [Non-text portions of this message have been > removed] > > > > ________________________________________________________________________ > ________________________________________________________________________ > > Message: 2 > Date: Fri, 16 Sep 2005 11:28:19 +0700 > From: "Agus Sukayat" > <[EMAIL PROTECTED]> > Subject: Report to Excell > > Siang para pakar oracle, > > saya punya procedure untuk memanggil excel dari dev > 6i dengan menggunaka item button di report dan > menambahkan procedure berikut : > ----------------------------------------------------- > PROCEDURE run IS > Application OLE2.OBJ_TYPE; > Workbooks OLE2.OBJ_TYPE; > Workbook OLE2.OBJ_TYPE; > Worksheets OLE2.OBJ_TYPE; > Worksheet OLE2.OBJ_TYPE; > WorkCell OLE2.OBJ_TYPE; > WorkColumn OLE2.OBJ_TYPE; > WorkFont OLE2.OBJ_TYPE; > WorkInterior OLE2.OBJ_TYPE; > ArgList OLE2.LIST_TYPE; > BEGIN > Application := > OLE2.create_obj('Excel.Application'); > OLE2.set_property(Application, 'Visible', 1); > Workbooks := OLE2.get_obj_property(Application, > 'Workbooks'); > Workbook := OLE2.invoke_obj(WorkBooks, 'Add'); > Worksheets := OLE2.get_obj_property(Workbook, > 'Worksheets'); > Worksheet := OLE2.get_obj_property(Application, > 'ActiveSheet'); > for i in Cell.First .. Cell.Last > loop > if Cell(i).Val is not null then > ArgList := OLE2.create_arglist; > OLE2.add_arg(ArgList, Cell(i).RowNo); > ole2.add_arg(ArgList, Cell(i).ColNo); > WorkCell := OLE2.get_obj_property(Worksheet, > 'Cells', ArgList); > ole2.destroy_arglist(ArgList); > ole2.set_property(WorkCell, 'Value', > Cell(i).Val); > ole2.set_property(WorkCell, 'NumberFormat', > Cell(i).Format); > if Cell(i).Align is not null then > ole2.set_property(WorkCell, > 'HorizontalAlignment', Cell(i).Align); > end if; > WorkFont := OLE2.get_obj_property(WorkCell, > 'Font'); > WorkInterior := ole2.Get_Obj_Property(WorkCell, > 'Interior'); > if Cell(i).FontName is not null then > OLE2.set_property(WorkFont, 'Name', > Cell(i).FontName); > end if; > if Cell(i).FontSize is not null then > OLE2.set_property(WorkFont, 'Size', > Cell(i).FontSize); > end if; > if mod(Cell(i).FontStyle, 2) = 1 then > OLE2.set_property(WorkFont, 'Bold', 1); > end if; > if mod(Cell(i).FontStyle, 4) > 2 then > OLE2.set_property(WorkFont, 'Italic', 1); > end if; > if mod(Cell(i).FontStyle, 8) > 4 then > OLE2.set_property(WorkFont, 'Underline', 2); > end if; > if Cell(i).FontColor is not null then > OLE2.set_property(WorkFont, 'ColorIndex', > Cell(i).FontColor); > end if; > if Cell(i).BgrColor is not null then > OLE2.set_property(WorkInterior, 'ColorIndex', > Cell(i).BgrColor); > end if; > OLE2.release_obj(WorkInterior); > OLE2.release_obj(WorkFont); > OLE2.release_obj(WorkCell); > end if; > end loop; > ArgList := ole2.create_arglist; > ole2.add_arg(ArgList, 'A:Z'); > WorkColumn := ole2.Get_Obj_Property(WorkSheet, > 'Columns', ArgList); > ole2.destroy_arglist(ArgList); > === message truncated === __________________________________ Yahoo! Mail - PC Magazine Editors' Choice 2005 http://mail.yahoo.com -- -----------I.N.D.O - O.R.A.C.L.E--------------- Keluar: [EMAIL PROTECTED] Website: http://indo-oracle.lizt.org (NEW) ----------------------------------------------- Bergabung dengan Indonesia Thin Client User Groups, Terminal Server, Citrix, New Moon Caneveral, di: http://indo-thin.vze.com Yahoo! Groups Links ------------------------ Yahoo! Groups Sponsor --------------------~--> Get Bzzzy! (real tools to help you find a job). Welcome to the Sweet Life. http://us.click.yahoo.com/A77XvD/vlQLAA/TtwFAA/PhFolB/TM --------------------------------------------------------------------~-> -- -----------I.N.D.O - O.R.A.C.L.E--------------- Keluar: [EMAIL PROTECTED] Website: http://indo-oracle.lizt.org (NEW) ----------------------------------------------- Bergabung dengan Indonesia Thin Client User Groups, Terminal Server, Citrix, New Moon Caneveral, di: http://indo-thin.vze.com Yahoo! Groups Links <*> To visit your group on the web, go to: http://groups.yahoo.com/group/indo-oracle/ <*> To unsubscribe from this group, send an email to: [EMAIL PROTECTED] <*> Your use of Yahoo! Groups is subject to: http://docs.yahoo.com/info/terms/
