medingan pake oledb yang ada di datawindownya lebih cepat aplikasi apa bisa dibuka
----- Original Message ---- From: sandy <[EMAIL PROTECTED]> To: Rio Albert <[email protected]> Sent: Wednesday, November 28, 2007 10:19:01 AM Subject: Re: [indopb] Tanya dong coba: //taken from http://www.softtree tech.com/ hightech/ dw_2_excel. htm // ... Init docname // ... GetFileOpenName or any other method if dw_1.SaveAs( docname, HTMLTable!, True) = -1 then MessageBox(" Warning", "Unable to export data. Error writing to file!", Exclamation! ) return end if // Convert HTML file to Excel native format OLEObject excel excel = CREATE OLEObject if excel.ConnectToObje ct(docname) = 0 then excel.application. DisplayAlerts = FALSE excel.application. workbooks( 1).Parent. Windows(excel. application. workbooks( 1).Name). Visible = True excel.application. workbooks( 1).saveas( docname, 39) excel.application. workbooks( 1).close( ) end if DESTROY excel // done atau download add-on pb di: http://desta. com.ua/dw2xls/ >Dear PB’rs saya bikin aplikasi save laporan to xl format, saya pake PB 8 dan xl nya office 2003. Tapi begitu di pake sama user, dengan versi office yang sama koq kolom2 nya jadi ngaco ya ? Kira2 ada yang pernah ngalamin dan solusinya apa ? Mohon pencerahannya… Thanks -rio- -- Best regards, sandy mailto:sandy@ infotech. co.id ____________________________________________________________________________________ Be a better sports nut! Let your teams follow you with Yahoo Mobile. Try it now. http://mobile.yahoo.com/sports;_ylt=At9_qDKvtAbMuh1G1SQtBI7ntAcJ
