Hi Setiawan,

thanks your idea... I think it's a good sharing from u.




                                                                           
             "Setiawan"                                                    
             <[EMAIL PROTECTED]                                             
             id>                                                        To 
             Sent by:                  <[email protected]>     
             [EMAIL PROTECTED]                                          cc 
             oogroups.com                                                  
                                                                   Subject 
                                       RE: [Programmer-VB] Crystal Report  
             09/27/05 01:42 AM         tanpa Export ke Application,        
                                       gimana caranya...?                  
                                                                           
             Please respond to                                             
             [EMAIL PROTECTED]                                             
               oogroups.com                                                
                                                                           
                                                                           




Dear Forum,

Mungkin dengan cara meng-overrides method dari exportbuttonclick bisa
membantu. Dan selebihnya kita bisa menggunakan savedialogbox untuk meminta
nama file yang akan disave. Property ExportButton tetap diberi nilai true,
nanti fungsi default akan kita override lagi.

Dan selebihnya Anda bisa kembangkan lagi, sesuai dengan kebutuhan anda.


Berikut sample code...
========================================
Private Sub CRViewer91_ExportButtonClicked(UseDefault As Boolean)
             UseDefault = False
             Report.ExportOptions.DiskFileName = "d:\abc.pdf"
             Report.ExportOptions.DestinationType = crEDTDiskFile
             Report.ExportOptions.FormatType = crEFTPortableDocFormat
             Report.Export False
End Sub




Regards,
Setiawan




Untuk keluar dari millis ini, kirim email kosong ke:
[EMAIL PROTECTED]


Yahoo! Groups Links








**********************************************************************
This e-mail and any files transmitted with it may contain 
confidential information and is intended solely for use by 
the individual to whom it is addressed.  If you received
this e-mail in error, please notify the sender, do not 
disclose its contents to others and delete it from your 
system.

**********************************************************************



------------------------ Yahoo! Groups Sponsor --------------------~--> 
Fair play? Video games influencing politics. Click and talk back!
http://us.click.yahoo.com/T8sf5C/tzNLAA/TtwFAA/k7folB/TM
--------------------------------------------------------------------~-> 

Untuk keluar dari millis ini, kirim email kosong ke:
[EMAIL PROTECTED]

 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/Programmer-VB/

<*> 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/
 


Kirim email ke