dotrung > 07-08-21, 08:04 AM
ongke0711 > 07-08-21, 05:39 PM
(07-08-21, 08:04 AM)dotrung Đã viết: Tuy nhiên, Phần sửa chứng từ đã làm rồi thì dữ liệu subform không hiện ra. Nhờ anh OngKe0711 xem giúp dùm em sai chỗ nào.
Dạ form Danh sách Phiếu có 2 Query để sau kiểm tra trùng sohoadon trên tblPhieuNhapXuat và thiết lập định khoản kế toán về cho nhanh ạ,
dotrung > 07-08-21, 07:19 PM
ongke0711 > 08-08-21, 12:13 AM
(07-08-21, 07:19 PM)dotrung Đã viết: file đã up lại đây anh https://www.mediafire.com/file/k2drglr6a...accdb/file
nút sửa không hoạt động a.
DoCmd.OpenForm Loadedfrm, acNormal, , , , , OpenArgs:="Edit" & "|20" & "|" & ID
Function GetRecordset() 'Nap Du lieu
'Nap du lieu cho Mainform PhieuXuat
strSQL = "SELECT tblPhieuNhapXuat.* FROM tblPhieuNhapXuat WHERE [SoChungTu] ='" & arrArgs(2) & "'"
dotrung > 09-08-21, 09:06 PM
ongke0711 > 10-08-21, 10:10 PM
(09-08-21, 09:06 PM)dotrung Đã viết: Em đã làm được rồi, cảm ơn anh OngKe0711 nhiều, sẵn đây anh Bảo hướng dẫn code nút Sao chép luôn được không, em làm hoài mà nó không hiện ra. thank anh!
DoCmd.OpenForm "frmCapNhatPhieuNhapXuat", acNormal, , , , , OpenArgs:="Copy" & Me.txtctu
'==> sửa lại'
DoCmd.OpenForm "frmCapNhatPhieuNhapXuat", acNormal, , , , , OpenArgs:="Copy|" & Me.txtctu
INSERT INTO tblPhieunhapxuat (SoChungTu, LoaiChungTu, Makhachhang, Khoa, Sovanchuyen, Noidung, Manx, UserID, Gionhap, Macty, NgayTT, Soseri, Banle, GopHD) SELECT LaySTT('tblPhieuNhapXuat',Sochungtu,[Forms]![frmDanhSachPhieuNhapXuat]![txtloai],Day(Date()), tblPhieunhapxuat.LoaiChungTu, tblPhieunhapxuat.Makhachhang, No AS Expr1, " AS Sovanchuyen, tblPhieunhapxuat.Noidung, tblPhieunhapxuat.manx, [Forms]![frmBangDieuKhien]![use] AS Manv, Time() AS Expr4, tblPhieunhapxuat.Macty, tblPhieunhapxuat.NgayTT, tblPhieunhapxuat.Soseri, tblPhieunhapxuat.Banle, tblPhieunhapxuat.GopHDFROM tblPhieunhapxuat WHERE SOCHUNGTu='PX2021070023'
INSERT INTO tblPhieunhapxuat (SoChungTu, LoaiChungTu, Makhachhang, Khoa, Sovanchuyen, Noidung, Manx, UserID, Gionhap, Macty, NgayTT, Soseri, Banle, GopHD) SELECT " & LaySTT([Forms]![frmDanhSachPhieuNhapXuat]!Sochungtu, [Forms]![frmDanhSachPhieuNhapXuat]![txtloai],Day(Date()) & ",
tblPhieunhapxuat.LoaiChungTu,....
dotrung > 11-08-21, 12:28 PM
ongke0711 > 11-08-21, 01:45 PM
(11-08-21, 12:28 PM)dotrung Đã viết: Nút sao chép (tt)
Em đã sửa được mainform nhưng subform load vẫn ko lên được, anh OngKe0711 hướng dẫn thêm em sai chỗ nào ạ, cảm ơn anh!
file https://www.mediafire.com/file/j52rk9dj4...accdb/file
...B.ThueGTGT, '" & [Forms]![frmDanhSachPhieuNhapXuat]![txtsotiep] & "' FROM....
dotrung > 11-08-21, 02:44 PM