Dear Jolma,
batasi data yang akan dikirim ke report dengan query
(select * from dtKaryawan Where KdDep = 'DeUang') sehingga hanya
akan ditampilkan departemen yang dimaksud.
Dim crRpt As CRPEAuto.Report
Dim objReport As clsReport
Dim vKdDep as string
vKdDep = "DeUang" 'Kode departement keuangan, misal.
Set objReport = New clsReport
Set crRpt = objReport.OpenReport
("C:\KwetChiro\Test\Reports\lapDep.rpt")
'.... Open Recordset
sqlstm = "select * from dtKaryawan Where KdDep = '" & vKdDep & "'"
rs.open sqlstm, conn
crRpt.Database.Tables.Item(1).SetPrivateData 3, Rs
crRpt.ParameterFields("KdDep").SetCurrentValue (vKdDep)
crRpt.Preview Judul, 0, 0, intSCRW, intSCRH
regards,
Yulianto
0812-806-3138
--- In [email protected], SiJugul Namiring
<[EMAIL PROTECTED]> wrote:
>
> dear all.
>
> Saya mau minta tolong teman2 sekalian...
>
> kalau ngebatasin Group yang tampil di crystal report dari VB
gimana ya ?
>
> jadi kalo misalkan data karyawan kita group berdasarkan
departemen, terus dari tampilan VB kita pengen yang tampil direport
hanya departemen yang kita pilih dari tampilan aja....
>
> aku pake ODBC untuk akses datanya.
> gak pake sama sekali ADODB.recordset.
> yang aku manipulasi adalah object crystal report designernya
sendiri.
>
> kalo ada yang bisa, tolong di jelasin ya...!!!
>
> terimakasih sebelumnya.
>
> __________________________________________________
> Apakah Anda Yahoo!?
> Lelah menerima spam? Surat Yahoo! memiliki perlindungan terbaik
terhadap spam
> http://id.mail.yahoo.com
>
Untuk keluar dari millis ini, kirim email kosong ke:
[EMAIL PROTECTED]
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/Programmer-VB/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
