Các bạn giúp mình với. Mình có "sự cố" như sau:
1. Query8 : Khi view ở dạng SQL như sau:
SELECT T5.Ma, T5.Mon1, T5.Mon2, T5.Mon3, T5.KC, T5.XL, T5.GC FROM T5 GROUP BY T5.Ma, T5.Mon1, T5.Mon2, T5.Mon3, T5.KC, T5.XL, T5.GC HAVING (((T5.GC)<=[Forms]![3]![k])) ORDER BY T5.KC DESC;
2. Câu lệnh trên nút Command Button của Form như sau thì chạy OK
Dim strSQL_TB As String
strSQL_TB = "SELECT Query8.* INTO T6 FROM Query8"
DoCmd.RunSQL strSQL_TB
3. Khi mình thay thế cái Query8 thành câu lệnh như ở phần 1 thì nó lại không chạy được. Đoạn code như sau:
Dim strSQL_TB As String
strSQL_TB = "SELECT (SELECT T5.Ma, T5.Mon1, T5.Mon2, T5.Mon3, T5.KC, T5.XL, T5.GC FROM T5 GROUP BY T5.Ma, T5.Mon1, T5.Mon2, T5.Mon3, T5.KC, T5.XL, T5.GC HAVING (((T5.GC) <= [Forms]![3]![K])) ORDER BY T5.KC DESC
.* INTO T6 FROM (SELECT T5.Ma, T5.Mon1, T5.Mon2, T5.Mon3, T5.KC, T5.XL, T5.GC FROM T5 GROUP BY T5.Ma, T5.Mon1, T5.Mon2, T5.Mon3, T5.KC, T5.XL, T5.GC HAVING (((T5.GC) <= [Forms]![3]![K])) ORDER BY T5.KC DESC
"
DoCmd.RunSQL strSQL_TB
Bạn nào biết ở phần 3 mình sai chỗ nào sửa dùm mình với
Xin cảm ơn