• Tùy chọn
• Đăng nhập
• Đăng ký
• Xem như trên Máy tính
• Accelerated Mobile Pages Theme

Giúp dùm bài tập query

• Trang chủ

  • Thủ Thuật Access
  • Access Cơ Bản
  • Query
  • Giúp dùm bài tập query
• Giúp dùm bài tập query

• Giúp dùm bài tập query

  nguyentrunghoadh > 29-06-17, 03:13 PM

  Chào mọi người, mong mọi người giúp đỡ. Tôi có một query như sau:
  Ma           Hovaten                     Daymon         Tietday         Chunhiemlop
  Dung      Nguyen Van Dung           Van6              4                    6/2                
  Dung      Nguyen Van Dung           Van9              5                    6/2                  
   Do tôi tạo query lấy dữ liệu từ nhiều bảng, nên cột "Chunhiemlop" bị lập lại 2 lần. Làm sao để tạo 1 query gộp những dòng có mã giống nhau (VD: "Dung") theo yêu cầu:
  Cột "Daymon" thì ghep lại bằng dấu phẩy VD: "Van6","Van9"; còn cột "Tietday" thì cộng 2 dòng VD: "4+5=9"; cuối cùng cột "Chunhiemlop" giống nhau nên ghi lại là: "6/2".
  Cảm ơn mọi người nhiều

• RE: Giúp dùm bài tập query

  ongke0711 > 29-06-17, 04:12 PM

  Bài toán này của bạn không giải quyết thuần túy bằng Query được đâu. Phải kết hợp với 1 hàm tự tạo để gộp nhiều dòng cùng 1 Field thành 1 list.
  Bạn có thể tham khảo hàm ConcatRelated() của Allen Browne. Link: http://allenbrowne.com/func-concat.html
  
  Còn dưới đây là hàm tui tạo 
  Giả định table chứa các record trên của bạn là Table1.
  
  - Bạn copy code dưới đây vào module, đặt tên gì cũng được.
  
  

  Mã PHP:

  Option Explicit

Function LienKetDong(IndexField As Variant)

   Dim db As DAO.Database
   Dim rs As DAO.Recordset
   Dim strSQL As String
   Dim RowList As String

   Set db = CurrentDb()
   strSQL = "SELECT Mon FROM Table1 WHERE [Ma] = """ & IndexField & """"

   Set rs = db.OpenRecordset(strSQL, dbOpenSnapshot)

   If Not rs.EOF Then
       rs.MoveFirst
   End If

   Do While Not rs.EOF
       RowList = RowList & rs(0) & ", "
       rs.MoveNext
   Loop

   LienKetDong = Left(RowList, Len(RowList) - 2)

End Function 


  
  - Bạn vô màn hình Design của Query, chọn SQL View, copy câu lệnh SQL này vào:
  
  

  Mã PHP:

  SELECT Table1.Ma, Table1.HoTen, LienKetDong([Ma]) AS DayMon, Sum(Table1.TietDay) AS TongSoTiet, Table1.ChuNhiem
FROM Table1
GROUP BY Table1.Ma, Table1.HoTen, LienKetDong([Ma]), Table1.ChuNhiem; 


  
  Done.
  
  

• RE: Giúp dùm bài tập query

  nguyentrunghoadh > 17-08-17, 09:11 AM

  Cảm ơn bạn ongke0711, mình đã làm thử theo cách bạn hướng dẫn nhưng vẫn bị lỗi, mình nhờ bạn giúp dùm trực tiếp trên file của mình nha. Đây là file mình đang làm:
  https://drive.google.com/file/d/0B0tcOP4...sp=sharing

• RE: Giúp dùm bài tập query

  ongke0711 > 17-08-17, 01:00 PM

  - Link file chỉnh sửa: http://www.mediafire.com/file/o32f9qjxcb...cong.accdb
  - Tôi nghĩ bạn cần tổ chức lại cái table phân công công việc của giáo viên để việc tổng hợp dữ liệu sau này dễ dàng hơn. Tổ chức table của Access nó không như Excel. Chủ yếu liệt kê theo dòng và tránh việc lưu lặp lại cùng một dữ liệu.
• Bài trước Bài tiếp