maidinhdan > 11-02-15, 05:11 PM
(11-02-15, 03:35 PM)nguoimacdoden Đã viết: Mình sẽ điều chỉnh lại theo cách bạn đang chỉ dẫn để cho đơn giản thao tác. Cho mình hỏi để tạo ra được hoá đơn xuất như bạn đang ví dụ ở trên thì phải tạo bảng query như thế nào kết nối dữ liệu như thế nào?
Cảm ơn bạn!!!
nguoimacdoden > 12-02-15, 12:15 PM
(11-02-15, 05:11 PM)maidinhdan Đã viết:(11-02-15, 03:35 PM)nguoimacdoden Đã viết: Mình sẽ điều chỉnh lại theo cách bạn đang chỉ dẫn để cho đơn giản thao tác. Cho mình hỏi để tạo ra được hoá đơn xuất như bạn đang ví dụ ở trên thì phải tạo bảng query như thế nào kết nối dữ liệu như thế nào?
Cảm ơn bạn!!!
Bạn cho mình xem mẫu hóa đơn bạn đang dùng đi, để mình làm Report giúp hoặc nếu có nhu cầu xuất sang Excel cũng được. Mấu Excel lần trước mình không mở được vì mình cài office 2003, bạn chuyển file đó sang 2003 nhé !
maidinhdan > 12-02-15, 06:48 PM
(12-02-15, 12:15 PM)nguoimacdoden Đã viết: Mình gửi bạn mẫu hoá đơn cần in ra, bạn xem với mẫu kiểu này thì làm theo kiểu report hay xuất ra excel sẽ thuận tiện hơn.
http://www.mediafire.com/view/ccj69t85fa...n1.Mau.xls
nguoimacdoden > 26-02-15, 02:14 AM
(12-02-15, 06:48 PM)maidinhdan Đã viết:(12-02-15, 12:15 PM)nguoimacdoden Đã viết: Mình gửi bạn mẫu hoá đơn cần in ra, bạn xem với mẫu kiểu này thì làm theo kiểu report hay xuất ra excel sẽ thuận tiện hơn.
http://www.mediafire.com/view/ccj69t85fa...n1.Mau.xls
Trả lời,
1. Với mẫu này thiết kế trên Report thôi, mình đã làm demo cho bạn rồi nè.
2. Bổ sung các lệnh để báo cho mình biết trong kho đã hết sản phẩm để ghép.
3. Bổ sung một số cột trong Table Ghepsanpham ( gồm [tiencong], [tiendatcoc],[Bạn có thể thêm cột chiết khấu vào đây]
4. Khi điền giá một sản phẩm (table chitietmathang) để tính giá bán ra thị trường nên để giá tính cho khối lượng là 1 ( Ví dụ Bạn nghĩ xem trong thực tế có ai đi chợ hỏi 3 cây vàng giá nhiêu vậy; bảo đảm người ta sẽ trả lời là 1 chỉ 4 triệu ) cái này mình có ghi chú trong table đó.
5. Nên bổ sung cột đơn vị tính vào table chitietmathang thì hay hơn.
Demo: https://sites.google.com/site/congthucas...Report.zip
Giải thích thêm: Tiền công là chỉ tính cho một sản phẩm nên không thể đưa vào bảng Thông tin chi tiết như yêu cầu của mẫu bạn đưa cho được
xem hình minh họa
Mình bổ sung rất nhiều chỗ so với bản củ rồi đó.
Nguyên cái chương trình này đem ra tiệm vàng xài được luôn rồi, Tính ra cũng gần đủ chức năng hết. Chỉ việc chỉ sửa cho đẹp là xong.
Thân ái chào bạn.
maidinhdan > 26-02-15, 10:05 AM
(26-02-15, 02:14 AM)nguoimacdoden Đã viết: Năm mới chúc bạn và gia đình sức khỏe, hạnh phúc và mọi điều như ý.
Đầu năm mình lại làm phiền bạn một tý, cho mình hỏi trong file bạn gửi cho mình, trong form "5frGhepsanpham" có thông tin trường "Tổng giá trị sản phẩm này" mặc dù mình đã sửa lại theo như mình hay làm nhưng vẫn bị báo lỗi "#Error"
Trong phần Subform "6frGhepsanphamChitiet Subform", mình vẫn giữ nguyên như bạn đang làm hướng dẫn mình:
Trường thành tiền = [Soluongdung]*[Giasebantrencai]
Trường Tổng giá bán = SUM([Soluongdung]*[Giasebantrencai]) (Cái này mình có đổi lại, trước đây bạn để là Tổng giá bán = SUM([txtthanhtien] nhưng khi mở ra mình thấy báo lỗi "#Error")
Trong form "5frGhepsanpham", trường "Tổng giá trị sản phẩm này" đang để như sau:
Tổng giá trị sản phẩm này = [Form]![6frGhepsanphamChitiet Subform]![txtTonggiaban]
Bạn xem lại giúp mình khắc phục lỗi này như thế nào nhé.
Cảm ơn bạn!!!
nguoimacdoden > 26-02-15, 11:39 AM
(26-02-15, 10:05 AM)maidinhdan Đã viết:(26-02-15, 02:14 AM)nguoimacdoden Đã viết: Năm mới chúc bạn và gia đình sức khỏe, hạnh phúc và mọi điều như ý.
Đầu năm mình lại làm phiền bạn một tý, cho mình hỏi trong file bạn gửi cho mình, trong form "5frGhepsanpham" có thông tin trường "Tổng giá trị sản phẩm này" mặc dù mình đã sửa lại theo như mình hay làm nhưng vẫn bị báo lỗi "#Error"
Trong phần Subform "6frGhepsanphamChitiet Subform", mình vẫn giữ nguyên như bạn đang làm hướng dẫn mình:
Trường thành tiền = [Soluongdung]*[Giasebantrencai]
Trường Tổng giá bán = SUM([Soluongdung]*[Giasebantrencai]) (Cái này mình có đổi lại, trước đây bạn để là Tổng giá bán = SUM([txtthanhtien] nhưng khi mở ra mình thấy báo lỗi "#Error")
Trong form "5frGhepsanpham", trường "Tổng giá trị sản phẩm này" đang để như sau:
Tổng giá trị sản phẩm này = [Form]![6frGhepsanphamChitiet Subform]![txtTonggiaban]
Bạn xem lại giúp mình khắc phục lỗi này như thế nào nhé.
Cảm ơn bạn!!!
Xin cảm ơn, và cũng xin chúc bạn: "Một năm mới tràn đầy niềm vui, hạnh phúc, thành đạt, luôn gặp may mắn và quan trọng hơn là gia đạo luôn bình an, vui vẻ, khỏe mạnh".
File lỗi của bạn đâu gửi lên với, hay hơn bạn tô màu những vị trí Error để mình dể quan sát...(Đang nghiên cứu SQL server kết nối Access và các câu lệnh khác nhau/giống nhau giữa chúng để làm demo Video hướng dẫn cho mọi người cùng tham khảo, nên bài mình làm cho bạn mình chỉ nhớ 50% thôi.)
maidinhdan > 26-02-15, 10:49 PM
(26-02-15, 11:39 AM)nguoimacdoden Đã viết: Đầu năm mình lại làm phiền bạn một tý, cho mình hỏi trong file bạn gửi cho mình, trong form "5frGhepsanpham" có thông tin trường "Tổng giá trị sản phẩm này" mặc dù mình đã sửa lại theo như mình hay làm nhưng vẫn bị báo lỗi "#Error"
Trong phần Subform "6frGhepsanphamChitiet Subform", mình vẫn giữ nguyên như bạn đang làm hướng dẫn mình:
Trường thành tiền = [Soluongdung]*[Giasebantrencai]
Trường Tổng giá bán = SUM([Soluongdung]*[Giasebantrencai]) (Cái này mình có đổi lại, trước đây bạn để là Tổng giá bán = SUM([txtthanhtien] nhưng khi mở ra mình thấy báo lỗi "#Error")
Trong form "5frGhepsanpham", trường "Tổng giá trị sản phẩm này" đang để như sau:
Tổng giá trị sản phẩm này = [Form]![6frGhepsanphamChitiet Subform]![txtTonggiaban]
Bạn xem lại giúp mình khắc phục lỗi này như thế nào nhé.
nguoimacdoden > 27-02-15, 02:34 PM
(26-02-15, 10:49 PM)maidinhdan Đã viết:(26-02-15, 11:39 AM)nguoimacdoden Đã viết: Đầu năm mình lại làm phiền bạn một tý, cho mình hỏi trong file bạn gửi cho mình, trong form "5frGhepsanpham" có thông tin trường "Tổng giá trị sản phẩm này" mặc dù mình đã sửa lại theo như mình hay làm nhưng vẫn bị báo lỗi "#Error"
Trong phần Subform "6frGhepsanphamChitiet Subform", mình vẫn giữ nguyên như bạn đang làm hướng dẫn mình:
Trường thành tiền = [Soluongdung]*[Giasebantrencai]
Trường Tổng giá bán = SUM([Soluongdung]*[Giasebantrencai]) (Cái này mình có đổi lại, trước đây bạn để là Tổng giá bán = SUM([txtthanhtien] nhưng khi mở ra mình thấy báo lỗi "#Error")
Trong form "5frGhepsanpham", trường "Tổng giá trị sản phẩm này" đang để như sau:
Tổng giá trị sản phẩm này = [Form]![6frGhepsanphamChitiet Subform]![txtTonggiaban]
Bạn xem lại giúp mình khắc phục lỗi này như thế nào nhé.
Bạn chỉ lại ô đó như sau
=[6frGhepsanphamChitiet Subform].[Form]![txtTonggiaban] ( bạn bị lỗi do bạn đặt chữ .[Form] trước tên sub)
hoặc như vậy =[6frGhepsanphamChitiet Subform]![txtTonggiaban]
Chú ý: cách gọi một ô text trong subform:
cú pháp: =[tên subform].[Form]![tên textbox]
Hoặc : =[tên subform]![tên textbox] ( bỏ đi .[Form]
Còn txtTonggiaban trong subform cũng chỉnh lại như sau: =Sum([Soluongdung]*[Giasebantrencai]) ( cái này mình thấy bạn đã chỉnh dùm mình rồi)
Giải thích: Chúng ta không thể tính tổng một cột không tồn tại trong table được ( Thành tiền chỉ là một textbox tạm): đó là lý do nó lỗi.
Hình minh họa:
Hình Design
Hình View
Demo fix lỗi về sum: https://sites.google.com/site/congthucas...ects=0&d=1
Rất xin lỗi vì hôm đó vội quá, chưa test dùm bạn.
Có gì cứ pm nhé, chúc bạn nhiều sức khỏe;
Kết luận một câu: bạn mở bài bạn lên chỉnh chỗ này nè:
Tổng giá trị sản phẩm này = [Form]![6frGhepsanphamChitiet Subform]![txtTonggiaban]
Chỉnh lại là : Tổng giá trị sản phẩm này = [6frGhepsanphamChitiet Subform]![txtTonggiaban]
maidinhdan > 27-02-15, 04:50 PM
(27-02-15, 02:34 PM)nguoimacdoden Đã viết: Nhờ sự giúp đỡ rất nhiệt tình của bạn mà "sản phẩm" đầu tay của mình cũng đã gần được hoàn thành. Trong quá trình làm mình đang còn gặp phải một số vấn đề nữa mà chưa biết cách xử lý, nhờ bạn xem và chỉ dẫn giúp mình nhé.
Mình gửi file các vấn đề + file mình đang làm để bạn xem giúp: http://www.mediafire.com/download/o6p3r4...an_mem.rar
Cảm ơn bạn nhiều!!!
maidinhdan > 27-02-15, 10:10 PM
me.textbox = IIf(IsNull(Me.thu), 0, Me.textbox)
Me.txttungay = DateSerial(Year(Now()), Month(Now()), 1)