Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Hỏi về nút tìm kiếm theo nhiều trường?
#1
Mình có một main form và một sub form.
Main form sẽ có một nút tìm kiếm theo các trường ID, Tên, Nghề Nghiệp... các trường này tương ứng với một textbox hoặc 1 combobox
Khi chọn xong các trường đó rùi thì mình ấn nút tra cứu thì nó sẽ hiển thị nên danh sách cần tìm trong subform.

P/S: Ai cho hỏi up bài tập dữ liệu access nên diễn đàn kiều gì nhỉ?
Chữ ký của casio262 http://lequang.vn
Reply
Những người đã cảm ơn
#2
Bạn đọc thông báo để biết cách up file và hình.
http://thuthuataccess.com/forum/announcement-1.html

Trong diễn đàn đã có rất nhiều chủ đề về tìm kiếm. Bạn chịu khó search với cụm từ Tìm Kiếm ở góc phải trên diễn đàn, mình tin rằng có hàng chục topic đáp ứng nhu cầu của bạn
Chữ ký của Noname 020
ღღღღღTài sản của Noname (View All Items) ღღღღღ
Reply
Những người đã cảm ơn casio262
#3
Tham khảo http://thuthuataccess.com/forum/thread-4721.html
Chữ ký của hoanglonglangtu Chiều tắt nắng trên con đường quen thuộc
Mưa rơi buồn qua ngõ vắng không em
Từng hạt ngọc rơi đùa qua kẽ lá
Những giọt tràn đầy ngõ ngách tâm tư
Em có biết chiều nay anh vẫn nhớ
Ở nơi nào em có nhớ chăng anh

Trên đời có quá nhiều chữ nếu,đáng tiếc là đều đã qua,việc đã xảy ra,hối hận cũng vô dụng
ღღღღღTài sản của hoanglonglangtu (View All Items) ღღღღღ
Reply
Những người đã cảm ơn casio262
#4
Mình đã tham khảo thêm một số chỉ dẫn của các bạn.
Và đã làm được phần nào nhưng vẫn chưa được đúng cho lắm sad
Mình đã tìm kiếm được từng trường trong các ô textbox hay combobox rồi. Nhưng vẫn còn vướng 1 điều là Tìm kiếm đồng thời gộp 2 trường lại với nhau thì vẫn chưa được mong mọi người xem qua và giúp mình với sad
Đây là file bài của mình.
http://www.mediafire.com/?ejlzj5i2pa1om6u
Thanks!!!
Chữ ký của casio262 http://lequang.vn
Reply
Những người đã cảm ơn
#5
Form tìm kiến của mình tìm theo 2 trường (pol và pod). Mình viết lệnh như sau:

Dim st As String
Me.pol_input.SetFocus

st = "SELECT * FROM tbl_data where "

If Me.pol_input.Text <> "" Or IsNull(Me.pol_input) = False Then
st = st & "tbl_data.pol like '*" & Me.pol_input.Text & "*'"
Else
st = st & "tbl_data.pol like '*'"
End If

Me.pod_input.SetFocus

If Me.pod_input.Text <> "" Or IsNull(Me.pod_input) = False Then
st = st & "AND tbl_data.pod like '*" & Me.pod_input.Text & "*'"
Else
st = st & "AND tbl_data.pod like '*'"
End If

Me.frm_query_subfrm.Form.RecordSource = st
Me.frm_query_subfrm.Form.Requery
End Sub
Chữ ký của nguyenhoaison Xin chào, mình là nguyenhoaison, Tham gia http://thuthuataccess.com/forum từ ngày 19-04 -12.
Reply
Những người đã cảm ơn
#6
Mình cũng làm như vậy rùi mà không được bạn ah.
Mã:
st = st & "tbl_data.pol like '*" & Me.pol_input.Text & "*'"
Sao like lại có dấu * ở 2 bên của ô tìm kiếm
Với cả
Mã:
st = st & "AND tbl_data.pod like '*" & Me.pod_input.Text & "*'"
đoạn này có and trên đầu khi bỏ trống pol thì lỗi ngay.
Chữ ký của casio262 http://lequang.vn
Reply
Những người đã cảm ơn
#7
Chào bạn.

Mã:
st = st & "tbl_data.pol like '*" & Me.pol_input.Text & "*'"
Ví dụ mình đưa dữ liệu cần tìm là AAA thì câu lệnh thực thi sẽ là:
Mã:
"SELECT * FROM tbl_data where tbl_data.pol like *AAA*"
, sẽ tìm tất cả các chuỗi có 3 ký tự AAA trong đó.

Mã:
st = st & "AND tbl_data.pod like '*" & Me.pod_input.Text & "*'"
tương tự nếu tìm pod có AAA và pol bỏ trống thì câu lệnh sẽ là:
Mã:
"SELECT * FROM tbl_data where tbl_data.pol like * AND tbl_data.pod like *AAA*"
Chữ ký của nguyenhoaison Xin chào, mình là nguyenhoaison, Tham gia http://thuthuataccess.com/forum từ ngày 19-04 -12.
Reply
Những người đã cảm ơn casio262 , changkhoonline77


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  [Help] Cập nhật combobox 2 từ combobox 1 (dữ liệu ở nhiều bảng) votinh.tq 6 209 22-11-16, 11:34 PM
Bài mới nhất: votinh.tq
  [Hỏi] Làm sao để ấn định Null cho trường Date khi sử dụng Class Module Minh Tiên 8 614 18-11-16, 09:29 AM
Bài mới nhất: MinhnHang
  Thay đổi hình ảnh theo mã feeling 3 154 04-11-16, 05:18 PM
Bài mới nhất: maidinhdan
  [Hỏi] Tổng hợp dữ liệu theo thời gian hoanghai902 1 141 21-10-16, 09:55 PM
Bài mới nhất: maidinhdan
  Lọc theo điều kiện trong listbox Ranju 3 183 06-10-16, 05:26 PM
Bài mới nhất: Ranju

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ