Chủ đề: nhờ các bạn giúp đỡ.
-
10-24-2008, 01:47 AM #1Junior Member
- Ngày tham gia
- Nov 2015
- Bài viết
- 0
nhờ các bạn giúp đỡ.
chao cac ban.
Minh là người mới biết và đang tìm hiểu về access và thấy đây là chương trình rất hay. mình đang gặp một vấn đề các bạn có thể hướng dẫn giúp mình được không.
Mình có 1 table bán hàng gồm các field: ngayban, nvban, loaihang, sluong.
và 1 form dùng để nhập liệu (như file đính kèm)
Mình nhờ các bạn viết giúp đoạn mã cho nút Luu du lieu để các text ngayban và NV banhang chi nhập 1 lần, còn loại hàng thì sẽ nhập nhiều loại.
khi bấm luu thì chương trình sẽ tự động cập nhật nhiều bản ghi vào table banhang.
mong cac ban giúp đỡ.
file cua minh
http://www.4shared.com/file/68070183/4648a800/thongke.htmlView more random threads:
- viết chương trình Access trong macro
- Lấy Ngày làm việc khi đăng nhập
- Tùy biến trên report access
- chế độ xem form, report trong access
- Khái niệm đầu tiên về lập trình trên Access
- Giải giúp mình bài tập này với
- chèn ảnh vào form của access
- Có sự khác nhau không giữa Font Tahoma trên XP và trên Win 7 ?
- Lỗi khi thêm dữ liệu vào CSDL Access
- Tối ưu thuật toán tạo thẻ kho trong access
-
10-24-2008, 03:58 AM #2Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: nhờ các bạn giúp đỡ.
Góp ý với bạn nha: Trên form bạn không chọn Record Source nên ko thể lưu bào table.
-
10-24-2008, 04:39 AM #3Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: nhờ các bạn giúp đỡ.
cám ơn bạn tienduyet đã góp ý, nhờ các bạn giúp mình sửa lại hoặc mình nghĩ cái này có thể làm được bằng VBA
-
10-24-2008, 05:09 AM #4Junior Member
- Ngày tham gia
- Nov 2015
- Bài viết
- 1
Ðề: nhờ các bạn giúp đỡ.
Có hai cách làm bạn ạ:
1. Bằng VBA:
Đây là file hoàn toàn làm bằng VBA: http://www.4shared.com/file/68099805/aa1b4d59/thongke.html
2. Tạo sừ bằng Record Source cho nó nhanh, đỡ phải ngồi nhận lệnh VBA cho nó mệt.
-
10-24-2008, 04:10 PM #5Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 2
Ðề: nhờ các bạn giúp đỡ.
cám ơn bạn. nhưng bạn đã hiểu sai ý của mình rồi. Ý mình là cùng một nhân viên, cùng ngày bán nhưng loại hàng và số lượng mình muốn nhập một lần nhiều loại hàng. còn các field Ngày bán và NVbán trong table bán hàng tự động copy giá trị là ngày bán và ten NVban xuống. như file của mình đã đưa. Cùng ngày bán, cùng NV bán nhưng số lượng loại hàng là 7 loại.
Nói chung ý mình là có thể lưu 1 lần nhiều records không?
-
10-24-2008, 07:24 PM #6Junior Member
- Ngày tham gia
- Nov 2015
- Bài viết
- 0
Ðề: nhờ các bạn giúp đỡ.
Nhưng bạn chỉ có 1 table thì chưa thể đáp ứng được yêu cầu.
Suy nghĩ của mình thì ít nhất bạn cũng phải có 3 table: tblNhanVien, tblLoaiHang, và tblGiaoDich. Trong đó tblNhanVien <---> tblGiaoDich liên kết 1 - n, tblGiaoDich <---> tblLoaiHang liên kết 1 - n. Từ đó bạn tạo 1Form frmGiaoDich (làm theo Wizard cho nhanh), trên form này bạn nhập Mã nhân viên -> tức khắc bạn có Họ tên đầy đủ của Mã nhân viên đó, tương tự Loại hàng cũng thế.
Kết luận: Bạn chỉ có 1 table thì yêu cầu đó có thể chưa làm được
Trên đây là ý kiến của mình thôi, bạn nên tham khảo các bậc đàn anh khác; trên 4rum nhiều anh giỏi lắm, ví như anh: phatnq2002 hay muontennguoi,.....
-
10-26-2008, 12:34 AM #7Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 1
Ðề: nhờ các bạn giúp đỡ.
Hướng dẫn của bạn Tienduyet minh chưa hiểu lắm.Có cao thủ nào có thể giải quyết vấn đề này giúp mình không nhỉ.
-
11-05-2008, 04:20 PM #8Silver member
- Ngày tham gia
- Aug 2015
- Bài viết
- 440
Ðề: nhờ các bạn giúp đỡ.
Bạn hãy viết đoạn mã sau cho sự kiện khi con trỏ chuột rơi vào ô nhập liệu ngày bán như sau:
Option Compare Database
Private Sub Ngayban_GotFocus()
If IsNull(Ngayban) Then
Ngayban = DLast("NgayBan", "Banhang")
Nhanvienban = DLast("NhanvienBan", "Banhang")
Mathang.SetFocus
End If
End Sub
Giải thích: Khi con trỏ rơi vào ô ngày bán mà chưa nhập dữ liệu có nghĩa là bạn muốn nhập dữ liệu vào 1 record mới. Ngay lập tức chương trình sẽ phát hiện ra điều này và tìm để lấy ngày bán và nhân viên bán cuối cùng gán cho các trường tương ứng trong record mới này. Đồng thời con trỏ sẽ rơi vào ô mặt hàng để bán không phải mất thêm 2 lần nhấn phím rồi mới nhập liệu được.
Còn khi con trỏ rơi vào Ô ngày bán đã có dữ liệu thì nó lặng thinh không làm gì cả.
Chúc may mắn!
-
11-05-2008, 10:44 PM #9Junior Member
- Ngày tham gia
- Nov 2015
- Bài viết
- 0
Ðề: nhờ các bạn giúp đỡ.
Gửi bởi quanghn81
Bạn cho quét qua các txtLOAIHANG(i), txtSOLUONG(i).
(Bạn hãy đặt tên các textbox lại cho có quy luật để tiện dùng hơn).
Cứ mỗi cái đó bạn phát 1 lệnh INSERT:
strSQL="INSERT INTO tblBANHANG (ngayban, nvBan, Loaihang, sluong) VALUES (" & txtNgayban & ", " & txtNVBan & ", " & txtLoaiHang1 & ", " & txtSoLuong1 & ")"
... phát lệnh add vào data ...
strSQL="INSERT INTO tblBANHANG (ngayban, nvBan, Loaihang, sluong) VALUES (" & txtNgayban & ", " & txtNVBan & ", " & txtLoaiHang2 & ", " & txtSoLuong2 & ")"
... phát lệnh add vào data ...
Tất nhiên bạn có thể gom lại thành 1 vòng lặp cho gọn.
-
11-05-2008, 11:40 PM #10Silver member
- Ngày tham gia
- May 2016
- Bài viết
- 4
Ðề: nhờ các bạn giúp đỡ.
Bác muon oi, em chưa xem qua file sample nhưng em nghĩ thế này có ổn không nhé.
Thay vì các câu lệnh hơi kỹ thuật như của bác ta sẽ để giá trị default cho các ô text trùng với tên người nhập và ngày nhập được hiện thị trên form
Hiện nay, các thuốc chống xuất tinh sớm được sử dụng nhằm cải thiện chất lượng đời sống tình dục của các cặp đôi. Tuy nhiên, các thuốc này cũng có nhiều tác dụng phụ không mong muốn. bởi thế, hãy...
Uống thuốc trị xuất tinh sớm là biện pháp được nhiều phái mạnh ưa dùng