HELP ME TO CREATE MY OWN LIBRARY SYSTEM I NEED TO LEARN EDIT, DELETE, SEARCH, SAVE.
IF ANYONE CAN HELP ME???
THANK YOU IN ADVANCE!!!

Recommended Answers

All 3 Replies

hi jhai salvador., how about search Button i use .filter but the datagrid didn't show the record i search...

Private sub cmdSearch_Click()
with adodc1
.refresh
.recordset.filter = "Call_No='" & txtSearch.text & "'"
.recordset.filter = "Book_Name='" & txtSearch.text & "'"
.recordset.filter = "Author='" & txtSearch.text & "'"
.recordset.filter = "Date_Published='" & txtSearch.text & "'"
.recordset.filter = "ISBN_No='" & txtSearch.text & "'"
.recordset.filter = "Book_Type='" & txtSearch.text & "'"

If Adodc1.recordset.EOF then
    msgbox "Book Record Not Found,Try Again!",vbOkOnly
else
    msgbox "Record Found!"vbInformation
end if
End with
end Sub

Heres a sample on how to use filter property.

recordset.Filter = "Call_No='" & txtSearch.text & "' OR Book_Name='" & txtSearch.text & "'"

you can read more here: Click Here

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.