sample kode program pencarian dengan menggunakan input
box, koneksi data base dengan menggunakan komponen
adodc dan untuk menampilkan tamppilan hasil pakai data
grid. seting koneksi adodc dengan database cukup
menyeting connection string (pilih data base dan
tabelnya)
Private Sub Command1_Click()
ID = InputBox("Masukan keyword")
kunci_penapisan = "%" + ID + "%"
query = " select * from karyawan where nik like '" &
kunci_penapisan & "' "
Adodc1.RecordSource = query
Adodc1.Refresh
datagrid1.datasource = adodc1
Adodc1.Refresh
tanda (%) untuk mengabaikan huruf sebelum atau sesudah
kata yang dicari. semoga bermanfaat.
--- Rick De Voe <[EMAIL PROTECTED]> wrote:
> kk2 semuanya, mohon bantuan & pengalamannya dunk....
>
> Latar belakang:
> symembuat database dgn ms access. prinsipnya sama
> seperti search enggine.terdapat textbox untuk
> memasukan kata yg hendak dicari...
>
> Permasalahan:
> jikainput (kata yang hendak dicari) di textbox
> terdapat beberapa karakterspasi setelah kata yang
> hendak dicari, maka kata yang dicari
> dapatditampilkan... tetapi jika terdapat beberapa
> karakter spasi didepan/sebelum kata yang hendak
> dicari, maka program error..
>
> Pertanyaan:
> bgm cara agar program hny membaca kata yang
> dimaksud/dicari. jika ada spasi sebelum & sesudah
> dapat diabaikan oleh program??
>
> Jawaban:
> (mohon kk2 semua membantu)
>
>
> tqqq
>
>
>
>
>
>
>
>
____________________________________________________________________________________
> You rock. That's why Blockbuster's offering you one
> month of Blockbuster Total Access, No Cost.
> http://tc.deals.yahoo.com/tc/blockbuster/text5.com
>
> [Non-text portions of this message have been
> removed]
>
>
____________________________________________________________________________________
You rock. That's why Blockbuster's offering you one month of Blockbuster Total
Access, No Cost.
http://tc.deals.yahoo.com/tc/blockbuster/text5.com
