Pencarian Data

Kali ini kita akan mencoba membuat Pencarian data siswa pada data yang telah kita Entrykan pada form siswa. Kita langsung gan...

- Buka Aplikasi yang sebelumnya kita buat.
- Double clik pada w_siswa. lalu tambahkan komponen Create GroupBox Control dan letakkan diatas dw_2 seperti gambar dibawah ini. berinama GroupBox tersebut dengan Cari Data.

- Tambahkan pula komponen Create SingleLineEdit Control dan letakkan dalam GroupBox yang tadi kita buat.

- Tambahkan pula komponen Create PictureButton Control dan letakkan didalam GroupBox

- Atur tampilan seperti gambar dibawah ini. Untuk mencari gambar pada PictureButton, agan bisa mencarinya pada Properties PictureName.

Tahap selanjutnya adalah pemberian sintak pada PicutrButton. Apabila kita mengklik SingleLineEdit, maka nama pada propertiesnya adalah Sle_1. maka sintaknya adalah sebagai berikut :

dw_2.retrieve()

dw_1.retrieve(sle_1.text)

if dw_1.getrow() = 0 then

messagebox("Pesan","Data tidak ada",information!)

dw_1.retrieve(gs_siswa)

else

gs_siswa=dw_1.getitemstring(dw_1.getrow(),"no_pendaftaran")

long ll_i

dw_2.retrieve(gs_siswa)

ll_i=dw_2.find("no_pendaftaran='"+gs_siswa+"'",1,dw_2.rowcount())

if ll_i>0 then

dw_2.scrolltorow(ll_i)

dw_2.selectrow(ll_i,true)

end if

if dw_1.getrow() = 0 then

messagebox("Pesan","Data tidak ada",information!)

end if

end if

Jika sudah coba agan jalankan. masuk kemenu -> input -> siswa. agan ketikaan data yang akan dicari dengan mengisinya dengan no_pendaftaran.

Silahkan agan coba dengan mencari data yang belum terdaftar dan klik cari. maka akan muncul pesasn bahwa data yang dicari tidak ada....

Ok gan semoga bermanfaat.....

salam sukses....

Source: http://girimaulana21.blogspot.com/ and http://nuansailmu.weebly.com/power-builder.html