Kirim Isi TextBox / Value Ke Crystal Report

Kali ini admin akan menguraikan cara Kirim Isi TextBox / Value Ke Crystal Report metode ini dengan kata lain kita akan menampilkan data ke laporan crystal report tanpa harus menyimpannya terlebih dahulu ke dalam database atau record dari tabel database. Langsung saja pada pokok pembahasan, pertaqma-tama kita buat sebuah project dari Ms. Visual basic 6.0 dengan opsi pilihan StandartEXE dan buatlah form kemudian tambahkan komponen TextBox, CommandButton dan Crystal Report Control. Untuk komponen Crystal Report Control klik menu Project - Component atau bisa dengan menekan tombol CTRL + T pada Keyboard, setelah selesai seperti gambar dibawah ini

Kemudian simpan, selanjutnya buka Crystal Report kemudian pilih salah satu opsi Using The Report Expert atau As Blank Report, selanjutnya akan tampil kotak dialog Data Explorer, langsung klik tombol Close saja.

Pada jendela Field Explorer - New dan berinama Formula

 

Kemudian klik ok, maka akan muncul jendela seperti dibawah ini langsung klik icon Save dan close

 

Selanjutnya Klik tahan / Drag formula yang telah kita buat tadi dan arahkan ke section detail pada lembar crystal report.

Simpan FileCrystal Report yang baru dibuat tadi, usahakan 1 folder dengan file Visual Basic 6.0 yang telah kita buat diawal. Buka kembali project Visual Basic 6.0 apabila telah ditutup lalu double klik pada CommandButton dan pastekan syntak dibawah ini

                      With CrystalReport1
                      .DiscardSavedData = True
                      .ReportFileName = App.Path & "\Report1.rpt"
                      .SelectionFormula = ""
                      .Formulas(1) = "xValue='" & Text1.Text & "'"
                      .RetrieveDataFiles
                      .WindowMinButton = True
                      .WindowShowCloseBtn = True
                      .WindowShowExportBtn = True
                      .WindowShowPrintSetupBtn = True
                      .WindowShowSearchBtn = True
                      .WindowBorderStyle = crptSizable
                      .WindowState = crptMaximized
                      .Action = True
                     End With

Setelah itu Run/F5 dan klik Command pada form tersebut maka akan tampil lembar laporan crystal report dengan data sesuai yang berada didalam textBox

 Source Codenya bisa didownload di LINK INI