hi...
coba bantu nih..
coba bikin report nya diluar vb..langsung dengan cr nya..
kemudian bikin form yang khusus nampilin report nya aja,tempatin satu kontrol crViewer
lalu tempatin code seperti dibawah ini:
Dim crystal As CRAXDRT.Application
Dim report As CRAXDRT.report
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
Set crystal = New CRAXDRT.Application
sql = "queri_nya"
rs.Open sql, dbbph, adOpenStatic, adLockOptimistic
Set report = crystal.OpenReport(App.Path & "\report\nana_report")
report.DiscardSavedData
report.Database.SetDataSource rs
reportadops.ReportSource = report
reportadops.ViewReport
Do While reportadops.IsBusy
DoEvents
Loop
reportadops.Zoom 100
rs.Close
selamat mencoba,mudah2an membantu...
thanks
--aL--
Ekra Sanggala <[EMAIL PROTECTED]> wrote:
coba bantu nih..
coba bikin report nya diluar vb..langsung dengan cr nya..
kemudian bikin form yang khusus nampilin report nya aja,tempatin satu kontrol crViewer
lalu tempatin code seperti dibawah ini:
Dim crystal As CRAXDRT.Application
Dim report As CRAXDRT.report
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
Set crystal = New CRAXDRT.Application
sql = "queri_nya"
rs.Open sql, dbbph, adOpenStatic, adLockOptimistic
Set report = crystal.OpenReport(App.Path & "\report\nana_report")
report.DiscardSavedData
report.Database.SetDataSource rs
reportadops.ReportSource = report
reportadops.ViewReport
Do While reportadops.IsBusy
DoEvents
Loop
reportadops.Zoom 100
rs.Close
selamat mencoba,mudah2an membantu...
thanks
--aL--
Ekra Sanggala <[EMAIL PROTECTED]> wrote:
Bagaimana menampilkan data yang berasal dari Query ke Crystal Report?Misalnya hari ini isi querynya "Select NRP from Mahasiswa"Besoknya diganti menjadi "Select * Nama From Mahasiswa"Jadi bentuk reportnya berubah-ubah sesuai querynya.Mohon Bantuannya.Terima KasihEkra
How much free photo storage do you get? Store your holiday snaps for FREE with Yahoo! Photos. Get Yahoo! Photos
Yahoo! FareChase - Search multiple travel sites in one click.
Untuk keluar dari millis ini, kirim email kosong ke:
[EMAIL PROTECTED]
YAHOO! GROUPS LINKS
- Visit your group "Programmer-VB" on the web.
- To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
- Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
