Em làm một form tìm kiếm thông tin từ một querry, Em tạo một comboBox, 1 subform (để hiện thị kết quả tìm kiếm), và một nút tìm kiếm. ComboBox thì link đến thông tin một bảng table để chọn tên. Nhưng khi nhấn vào nút tìm kiếm thì nó toàn hiện dấu ####. Anh, chị nào biết giải thích giùm em với.

Đây là đoạn code của em:

Private Sub Tim_DAILY()
Dim st As String

If Me.Combo24.Value <> "" Then
st = st & "AND HS_DAILY.Tendaily=" & Me.Combo24.Value
End If

Me.Query1_subform.Form.RecordSource = st
Me.Query1_subform.Form.Requery

End Sub

Private Sub Command35_Click()
On Error GoTo Err_Command35_Click
Tim_DAILY
Exit_Command35_Click:
Exit Sub
Err_Command35_Click:
MsgBox Err.Description
Resume Exit_Command35_Click
End Sub

Thứ nhất:

Nếu Tendaily kiểu Text thì bạn sửa lại đoạn này

--> st = st & "AND HS_DAILY.Tendaily='" & Me.Combo24.Value & "'"

Có thêm dấu nháy đơn

Thứ hai:

Đoạn này thấy k ổn ----> Me.Query1_subform.Form.RecordSource = st

Để hỗ trợ tốt nhất thì bạn up file của bạn lên để mọi người xem qua. Đa phần trả lời chậm cũng vì mọi người lười tạo file mẫu

Nếu có up file lên thì bạn Compact and Repair lại để dung lượng giảm. Thêm nữa, xem hướng dẫn cách Up file ở phía trên diễn đàn có hướng dẫn.

Thân!

Thanks bạn đã gợi ý cho mình, đây là link mediafire ma mình đa uplen, bạn có thể xem và góp ý cho mình được không ? Mong hồi âm sớm của các bạn
http://www.mediafire.com/?9lx5vaps5wdxnax

Mình đã xem qua file của bạn. Bạn đã phát biểu câu SQL sai rồi.

1 câu lệnh SQL đơn giản được phát biểu : SELECT A,B,C FROM TABLE WHERE A='abc';
---> hãy để ý những chữ in đậm vì 1 câu lệnh SQL đúng, tối thiểu nó phải có những từ khóa đó

Còn câu SQL của bạn là : SELECT HS_DAILY.Tendaily, HS_DAILY.Nguoidaidien, HS_DAILY.Diachi,...... AND HS_DAILY.Tendaily='xxxx'

Gửi lại bạn file mình đã sửa. Chẳng biết bạn định sửa form nào. Mình chỉ sửa form Test1 thôi.

Quanlydailyphanbon.mdb

Cảm ơn bạn rất nhiều ! mình cũng đã thử dùng From rồi nhưng nó toàn báo lỗi thôi, bạn có thể sửa mình form Tim_DAILY ko ? code này mình copy của một người bạn nhưng sao mình đổi thành của mình thì toàn xuất hiện ##?NAME thôi.

Sửa thì là chuyện nhỏ nhưng sau khi mọi người sửa rồi thì bạn có hiểu và áp dụng nó về sau không đã.
Sau khi bạn xem xong file đã chỉnh sửa bạn hãy cho mọi người biết bạn đã hiểu cách làm đó hay chưa. Diễn đàn được lập ra cũng chỉ mong mọi người có thể trao đổi kinh nghiệm cho nhau, chứ không phải là giúp người khác giải quyết vấn đề

Form Tim_DAILY của bạn mình đã sửa. Có gì thắc mắc thì bạn cứ gửi câu hỏi

Quanlydailyphanbon.rar


Thân

Sau khi xem bài sửa của bạn thì mình cũng đã hiểu ra được rất nhiều vấn đề ví dụ bổ sung thêm vào trong câu lệnh if: Or IsNull(Me.Text37) = False. Cái này mình chưa nghi ra, nhưng khi xem xong của bạn thì mình hiểu thêm được nhiều vấn đề mà mình còn thiếu. Cảm ơn bạn đã giúp đỡ mình rất nhiều. NHưng có một điều là cũng code đó thì phần mền bạn mình làm chạy, còn mình làm thì toàn báo lỗi, phần liên kết thì giống nhau. Đây cũng là lần đầu mình lập trình nên nhiều cái còn thiếu sót, hy vọng sẽ được sự giúp đỡ của các bạn. Thanks cafe via he rất nhiều.