mudah2an ni dapat membantu ya ...
'untuk memfilter nama barang berdasarkan abjad yg ditekan dan merefresh tabel berdasarkan abjad yg ditekan
Private form_load()
dim c_andi As New ADODB.Connection
dim rbrg as new ADODB.Recordset
rbrg.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=...bla..bla..bla rbrg.ActiveConnection = c_andi
rbrg.CursorLocation = adUseClient
end sub
Private Sub Text2_Change()
If rbrg.State = adStateOpen Then
rbrg.Close
End If
rbrg.Open "select * from tbrg " & "where left(namabrg, " & Len(Trim(Text2)) & ") = '" & Replace(Trim(Text2), "'", "''") & "'" & "order by namabrg", c_andi, adOpenStatic
Set datagrid.DataSource = rbrg
end subrbrg.Close
End If
rbrg.Open "select * from tbrg " & "where left(namabrg, " & Len(Trim(Text2)) & ") = '" & Replace(Trim(Text2), "'", "''") & "'" & "order by namabrg", c_andi, adOpenStatic
Set datagrid.DataSource = rbrg
Ronald Irawan <[EMAIL PROTECTED]> wrote:
select * from tabel nya where code like '/%' --> ini untuk inisial nya / , untuk yg lain tinggal ganti tanda / dengan w(misal )
Salam
Ronald Irawan
Pt. Sanghiang Perkasa
Gd. Graha Kirana Lt.5
Jl Yos Sudarso Kav.88
Jakarta
pupunk <[EMAIL PROTECTED]>
Sent by: [email protected]01/06/2006 01:42 PM
Please respond to
[email protected]
To[email protected] cc Subject[Programmer-VB] tanya menampilkan record berdasarkan initial record
kawan mohon bantuannya donk....
sy punya tabel sbb:
Code
-------------
/ABC
/ERT67
/456
WAG76
WAS77
WRT12
nah yg ingin sy tanyakan bgm cara menampilkan record2x tsb yg berinitial "w" saja atau "/" saja
sebelum & sesudahnya sy ucapkan terimakasih
pupunk
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
SPONSORED LINKS
Programmer Indonesia Basic programming language Computer programming languages Programming languages Java programming language
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.
New and Improved Yahoo! Mail - 1GB free storage!
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
SPONSORED LINKS
| Programmer | Indonesia | Basic programming language |
| Computer programming languages | Programming languages | Java programming language |
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.
