Nhập dữ liệu từ COmBo list
thanhliem0906 > 27-06-12, 12:34 PM
Trong Form mình tạo 1 Combo box (tên là C_MaCty) có Source là 1 query (tên là Q_Macty, nguồn là bảng T_Danhmuccongty).
Khi mình nhập 1 giá trị mới chưa có vào Combo box, thì mình viết 1 code mở Form và thêm 1 record mới vào bảng T_Danhmuccongty.
Dim rs As Recordset
Set rs = CurrentDb.OpenRecordset("Danh muc cong ty", 2)
rs.AddNew
rs!MaCty = Forms![themcongty_F_PTKH]![MaCty]
rs!Tencongty = Forms![themcongty_F_PTKH]![Tencty]
rs!MST = Forms![themcongty_F_PTKH]![MST]
rs.Update
rs.Close
DoCmd.Close
Sau đó mình quay lại Combo box C_Macty, vẫn chưa thấy macty mới vừa cập nhật thêm vào. Xin hỏi tại sao, chỉ giúp nhé. tks. (Đóng Form này rồi mở lại thì thấy).