di report anda, kan ada satu kotak menandakan subreport nanti letaknya disana... coba di klik kanan di kotak subreport itu.. lalu pilih change subreport links... nah disitu anda bisa men-specify parameter untuk me-link report dengan subreport supaya jika data di report ter-filter sesuai choice, di subreport jg bisa ter-filter sesuai choice yang diinginkan di report.
-----Original Message----- From: [email protected] [mailto:[EMAIL PROTECTED] Behalf Of puthut_vai Sent: Monday, March 24, 2008 7:54 PM To: [email protected] Subject: [Programmer-VB] QUERY KE DALAM SUB REPORT CR8.5 Hi All,... saya punya masalah mengenai Query ke dalam Sub report dari VB 6 ke dalam Cr8.5 Saya Punya 4 Buah Tabel, Yaitu - Tabel 1 - Tabel 2 - Tabel 3 - Tabel 4 dimana dari ketiga tabel tersebut berhubungan 1 : M ke Tabel 1 Field yang menghubungkan sebut saja fieldX Pada CR saya merancang ke dalam Report Utama adalah data2x yang ada pada Tabel 1 kemudian tabel lainnya saya buat ke dalam Subreport dan saya satukan ke dalam Report Utama. ( Tidak menggunakan detail pada report utama karena informasi yang ingin ditampilkan ke dalam report utama karena muatan informasinya di dalam tabel berbeda dan harus dipisahkan) Pada VB 6 saya ketikan coding di bawah ini untuk menampilkan report yang telah saya buat : ' CrystalReport1 = CrystalReport Control ' Text1.text -- Text Box dim Choice as string Choice = text1.text With CrystalReport1 .DataFiles(0) = App.Path + "\Database.mdb" .ReportFileName = App.Path + "\ReportUtama.rpt" .ReplaceSelectionFormula ("") .ReplaceSelectionFormula ("{Tabel 1.FieldX}='" & Choice & "'") .ReplaceSelectionFormula ("{Tabel 2.FieldX}='" & Choice & "'") .ReplaceSelectionFormula ("{Tabel 3.FieldX}='" & Choice & "'") .ReplaceSelectionFormula ("{Tabel 4.FieldX}='" & Choice & "'") .Destination = crptToWindow .WindowState = crptMaximized .Action = 1 End With Hasil yang diperoleh adalah : Semua Data pada subreport tersebut keluar semuanya, hanya pada Report Utama saja yg hasilnya sesuai dengan choice. Thanks Puthut Wibowo ------------------------------------ Wahana Programmer Groups Links No virus found in this incoming message. Checked by AVG. Version: 7.5.519 / Virus Database: 269.21.8/1340 - Release Date: 3/23/2008 6:50 PM No virus found in this outgoing message. Checked by AVG. Version: 7.5.519 / Virus Database: 269.21.8/1340 - Release Date: 3/23/2008 6:50 PM
