Re: [indopb] Tanya dong

[sandy]

coba:

//taken from http://www.softtreetech.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.ConnectToObject(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:[EMAIL PROTECTED]


__._,_.___





-----------------------------------------------
IndoPB - Indonesia PB User Group 
An Indonesian PowerBuilder User Group's Event
2nd PowerBuilder Update
Rumah Sakit Jantung Harapan Kita
26/27 August 2006
To Register : 
http://groups.yahoo.com/group/indopb/database?method=addRecord&tbl=4








   



    



      
      Your email settings: Individual Email|Traditional 
      Change settings via the Web (Yahoo! ID required) 
      Change settings via email: Switch delivery to Daily Digest | Switch to Fully Featured 
           
        Visit Your Group 
       |
      
        Yahoo! Groups Terms of Use
       |
      
       Unsubscribe 
       
 
    
  




__,_._,___