Brain
|
> |
Coba bantu ya.... Kalo pencarian berdasarkan input dari text box biasanya aku buat seperti ini...
Private Sub txtCariJudul_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then Set rs = New ADODB.Recordset With rs .ActiveConnection = cn .Source = "Select Judul, * from tbl_DataBuku" & _ " where Judul like '" & txtCariJudul.Text & "%'" ' <--- Ini pencarian berdasarkan huruf depan saja .CursorType = adOpenKeyset .LockType = adLockOptimistic .Open End With
Set DatGrid1.DataSource = rs DataGrid1.Refresh
End Sub
|
mo koreksi dikit, jgn pake event keypress lebih pake event change, baru bikin neh
kalo pake event keypress pada saat keypress dia punya kekurangan yaitu tidak bisa tau len dari textbox yang kita ketik.
jadi misalnya kita ketik 1 huruf saja, dia tidak mau filter ...
kalo kita ketik 2 huruf dia baru filter 1 huruf di depan...
ini pengalaman saya baru saja.... saking stressnya sampe gak kepikiran event change .. hehehehe
Salam,
ChipMunks (Copy Paste Programmer)
mailto: [EMAIL PROTECTED]
Yahoo : Henqy
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.
