FILTER vs FIND

Apa sih yang bikin beda antara 2 fungsi ini?

Begini Lhoooo…, Find hanya digunakan untuk mencari record dengan satu kriteria saja tapi kalo filter fungsinya mengumpulkan record2 yang memenuhi kriteria yang kita berikan. jadi intinya sih filter lebih enak kalo qt pakai buat mencari record dengan berbagai kriteria.

‘Example Source code

Option Explicit

’sample find :

private sub AmbilNamaLabel()

If rs.State Then rs.Close

rs.Open “select * from LABEL”, OC, adOpenKeyset, adLockPessimistic

With rs

    .Find “Label_ID=’” & cboLabelID & ” ‘”, , adSearchForward, 1

    If Not .EOF Then

         txtLabelName.text = .Fields(1)

    End If

End With

If rs.State Then rs.Close

end sub

’sample filter

private sub AmbilNamaLabel()

If rs.State Then rs.Close

rs.Open “select * from LABEL”, OC, adOpenKeyset, adLockPessimistic

With rs

    .Filter = “Label_ID=’” & vCode & “‘ and Operator_ID=’” & vOperator & “‘”

    If Not .EOF Then

         txtLabelName.text = .Fields(1)

    End If

End With

If rs.State Then rs.Close

end sub

cuma begitu doank… :d

mudah ye…

Viva Programmer Indonesia

Semoga bermanfaat

ant <(*_*)>