rekan2 milis ada yang bisa bantu masalahku?
1. setelah proses filter dilakukan, data ditampilakan disebuah
datagrid.
gimana cara mencetak data yang ada di datagrid tersebut?
aku menggunakan :
If OptSemua = True Then
Q = " select * from stok where kondisi='1'"
Q = Q & "and time between #" & Format(dtjam1.Value, "HH:mm") & "#
and #" & Format(dtjam2.Value, "HH:mm") & "# "
Q = Q & "and tanggal between #" & Format
(DTPicker1.Value, "MM/dd/yyyy") & "# and #" & Format
(DTPicker2.Value, "MM/dd/yyyy") & "# order by tanggal"
Adodc1.RecordSource = Q
Adodc1.Refresh
End If
If OptMM = True Then
Q = " select * from stok where jenis = 'EMAS MUDA ' and
kondisi='1'"
Q = Q & "and time between #" & Format(dtjam1.Value, "HH:mm") & "#
and #" & Format(dtjam2.Value, "HH:mm") & "# "
Q = Q & "and tanggal between #" & Format
(DTPicker1.Value, "MM/dd/yyyy") & "# and #" & Format
(DTPicker2.Value, "MM/dd/yyyy") & "# order by tanggal"
Adodc1.RecordSource = Q
Adodc1.Refresh
End If
If OptMT = True Then
Q = " select * from stok where jenis = 'EMAS TUA' and kondisi='1'"
Q = Q & "and time between #" & Format(dtjam1.Value, "HH:mm") & "#
and #" & Format(dtjam2.Value, "HH:mm") & "# "
Q = Q & "and tanggal between #" & Format
(DTPicker1.Value, "MM/dd/yyyy") & "# and #" & Format
(DTPicker2.Value, "MM/dd/yyyy") & "# order by tanggal"
Adodc1.RecordSource = Q
Adodc1.Refresh
End If
untuk memfilter dari database.
setelah cmdprint ditekan hanya data yang tampil di datagrid saja yg
dicetak.
2. gimana ya cara membuat agar tampilan di data grid untuk kolom no
bisa muncul auto number?
saya telah membuat databasenya dengan visdata.
thank's for attention
Untuk berhenti berlangganan kirim email kosong ke : [EMAIL PROTECTED]
Forum ini berkembang dengan pesat, jika anda memiliki
dedikasi dan waktu, silahkan mengaplikasikan diri
menjadi moderator.
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/indoprog-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/
