Kalau pakai database Access, pakai *, sedangkan kalau pakai SQL Server pakai % mas. jadi seperti ini :
"Select * From TblMhs Where nama Like 'Vavai%'" Vavai http://blog.vavai.com ERIS RISO wrote: > > > > > > Terus terang saya belum pernah pake cara pencarian kayak gini, tapi > kalo betul syntax cari nya coba ubah If RSQUIZ.EOF Then > > Menjadi If NOT RSQUIZ.EOF Then > > Logikanya, jika kamu menyatakan If RSQUIZ.EOF Then berarti menganggap > jika tidak ada data ditemukan, sementara perintah dibawahnya > menunjukan jika ada data > > > > Semoga membantu > > ------------------------------------------------------------------------ > > *From:* [email protected] > [mailto:[EMAIL PROTECTED] *On Behalf Of *wawan setiawan > *Sent:* 17 Januari 2007 8:44 > *To:* [email protected] > *Subject:* [Programmer-VB] Pencarian menggunakan sintax "like" > > > > Dear Alll Progrrammer mania > > hallo saya masih awam dalam pemograman VB saya pengen banyak tanya > untuk pencarian data yang menggunakan "Like" kalo saya coba selalu > gagal terus ini sintaxnya semoga teman tau jawabannya thenks > > > > Sub CARINAMA() > On Error Resume Next > Select Case Cmb > Case "NAMA" > RSQUIZ.Find "NAMA LIKE'*" + Text10 + "*'", , adSearchForward, 1 > End Select > If Text10.Text = "" Then > MsgBox "Masukan Nama Yang Dicari", vbOKOnly + vbInformation, "Cari Nama" > Text10.SetFocus > Else > If RSQUIZ.EOF Then > MsgBox "Data Ditemukan", vbCritical + vbOKOnly, "Cari" > RSQUIZ.Filter = "" > Call tampil > End If > On Error GoTo 0 > End If > End Sub > > saya udah coba tapi program blm bsa jalan sesuai dengan yang di > harapkan semoga programmer mania dapat membantu menemukan solusinya > > thenks > >
