coba pake cara ini,tapi rancang dulu report nya..
bikin satu form,tarok control crviewer nya crystal di form tesebut
kemudian kasi satu command button dan ketikkan script berikut..
sql="select * from bla..bla. where id=bla..bla."
rs.open sql, dbConn, adOpenStatic, adLockOptimistic
Set report = crystal.OpenReport(App.Path & "\namareport.rpt")
report.DiscardSavedData
Set report = crystal.OpenReport(App.Path & "\namareport.rpt")
report.DiscardSavedData
report.Database.SetDataSource
rs
rpt.ReportSource = report
rpt.ViewReport
Do While rpt.IsBusy
DoEvents
Loop
rpt.Zoom 100
rs.Close
semoga embantu
rpt.ReportSource = report
rpt.ViewReport
Do While rpt.IsBusy
DoEvents
Loop
rpt.Zoom 100
rs.Close
semoga embantu
--aL--
skdmdn <[EMAIL PROTECTED]> wrote:
skdmdn <[EMAIL PROTECTED]> wrote:
Rekan2,Bagaimana cara menampilkan hasil execute sql di crystal report.Misalnya sql="select * from pegawai where nip="9220"Thank's
Blab-away for as little as 1ยข/min. Make PC-to-Phone Calls using Yahoo! Messenger with Voice.
Wahana Programmer Groups Links
<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
http://wahanaprogrammer.net
<*> Untuk menghubungi owner milis ini, kirim email ke:
[EMAIL PROTECTED]
<*> Konsultasi pemrogramman bisa chat disini:
Yahoo! Messenger: wahanaprogrammer
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.
