Author Topic: bagaimana listing mencari data dengan menggunakan dua field dari suatu tabel  (Read 296 times)

0 Members and 1 Guest are viewing this topic.

Offline jester

  • Full Member
  • *
  • Posts: 69
Selamat Pagi Teman-Teman Foxer,Saya Mau Nanya bagaimana listing mencari data dengan menggunakan 2 field dalam satu tabel,misal saya mau mencari nopol dan nama peminjam.jadi ketika saya ketikkan nopol atau nama peminjam di textbox 6 yang saya kasih listing pencarian data maka akan tampil data yang saya cari,ini listing saya sebelumnya dan error ngak bisa mencari dengan 2 field,saya mohon bantuannya,

ambil=upper(trim(thisform.text6.value))
select mobilpinjam
set filter to
LOCATE for ambil $ Upper(trim(namapinjam)) .and. Upper(trim(nopol))
if FOUND()
set filter to ambil $ Upper(trim(namapinjam)) .and. Upper(trim(nopol))
thisform.grid1.refresh()
goto top
thisform.tampildata()
thisform.hiduptombol()
thisform.hapus.Enabled=.f.
thisform.batal.enabled=.f.
thisform.simpan.enabled=.f.
else
messagebox("data Masih Kosong atau data tidak di temukan",0+64,"Info")
thisform.hiduptombol()
thisform.batal.enabled=.f.
thisform.simpan.enabled=.f.
endif
thisform.text6.visible=.f.

Offline pangeranku

  • Junior Member
  • *
  • Posts: 140
mungkin ini bisa dicoba coding ini

xcari=UPPER(ALLTRIM(thisform.text6.Value))
lcFind = '%'+alltrim(xcari)+'%'


   SELECT * FROM mobilpinjam WHERE UPPER(nopol+nama) like lcFind  INTO CURSOR temp
   thisformset.data

   IF EMPTY(this.value)

   SELECT * FROM mobilpinjam INTO CURSOR temp
   thisformset.data
   ENDIF