RE: [Programmer-VB] Refresh cr

Mon, 11 Aug 2008 17:19:40 -0700 

Buat seperti ini:

 

Private Sub Form_Load()

    Report.DiscardSavedData      'tambahkan code ini
    CRViewer1.ReportSource = Report
    CRViewer1.ViewReport
End Sub

Private Sub Form_Resize()
    CRViewer1.Top = 1200
    CRViewer1.Left = 0
    CRViewer1.Height = ScaleHeight
    CRViewer1.Width = ScaleWidth
End Sub

 

From: Programmer-VB@yahoogroups.com [mailto:[EMAIL PROTECTED]
On Behalf Of iwan gunawan
Sent: 11 Agustus 2008 14:33
To: [EMAIL PROTECTED]; programmer-VB@yahoogroups.com
Subject: [Programmer-VB] Refresh cr

 

Guys, tolongin gw donk, gimana caranya kalo crviewer1 bisa langsung refresh
tanpa hrs tekan tanda petir di cristal reportnya.
Shre donk elmunya, thanks b4.
di bawah ini potongan kodingnya, tambahain yah.

Dim Report As New CrystalReport3

Private Sub Form_Load()
    Screen.MousePointer = vbHourglass
    CRViewer1.ReportSource = Report
    CRViewer1.ViewReport
    Screen.MousePointer = vbDefault
End Sub

Private Sub Form_Resize()
    CRViewer1.Top = 1200
    CRViewer1.Left = 0
    CRViewer1.Height = ScaleHeight
    CRViewer1.Width = ScaleWidth
End Sub


 

Internal Virus Database is out of date.
Checked by AVG - http://www.avg.com
Version: 8.0.138 / Virus Database: 270.5.5/1569 - Release Date: 7/23/2008
1:31 PM

Kirim email ke