Terima kasih mas, tp kalo tetap menggunakan metode CRAXDRT.Report sebenarnya bisa g ya kirim formula ke CR nya ? Thx
________________________________ From: Yopie Sofianto <[email protected]> To: [email protected] Sent: Thu, May 20, 2010 5:55:35 AM Subject: Re: [programmer-vb] Gagal Kirim Formula Crystal Report Salam VB, Kirim formula dgn metode ini memang sedikit membingungkan, tp ada solusi lain Coba add component Crystal Report Control ~ tambahkan komponen tsb k dalam form laporan yg dimaksud Ganti dengan syantax ini CrystalReport1. ReportFileName = RptFile CrystalReport1. Formulas( 0) = "SubJudul='" & sSubJudul & "'" CrystalReport1. DiscardSavedData = True CrystalReport1. WindowState = crptMaximized CrystalReport1. Action = 1 Semoga membantu... ________________________________ GENERASI COMPUTER Berbagi Ilmu Visual Basic Bagi Pemula http://www.generasi computer. com Hp. 08126514562 ________________________________ ________________________________ From: athallah_ramadhan <athallah_ramadhan@ yahoo.com> To: programmer-vb@ yahoogroups. com Sent: Wed, May 19, 2010 11:52:25 PM Subject: [programmer- vb] Gagal Kirim Formula Crystal Report Halo teman2, Saya ada masalah dlm pengiriman formula pd crystal report, sebelumnya sy membuat formula dgn nama SubJudul, pd saat sy kirim formulas via VB, muncul error subscript out of range...begitu jg halnya kalo indexnya sy ganti dgn 1 ( Rpt.FormulaFields( 1) ). Mohon bantuannya, terima kasih... Dim Rpt As CRAXDRT.Report Dim RptApp As New CRAXDRT.Application Set Rpt = RptApp.OpenReport( RptFile) Rpt.FormulaFields( 0) = "SubJudul='" & sSubJudul & "'" Rpt.Database. SetDataSource Adodc1.Recordset Rpt.DiscardSavedDat a rptViewer.ReportSou rce = Rpt rptViewer.ViewRepor t Me.Show vbModal
