PDA

View Full Version : các bác giúp em cái !!!



tien bac
26-01-2004, 11:42
Các bác ơi em có 2 bảng
Bảng "Danh sách" và bảng "Tiền lương" bây giờ khi em nạp vào trường "Tên công nhân" trong bảng "Danh sách" mà làm thế nào để trường "Tên công nhân" trong bảng "Tiền lương" cũng sẽ update tất cả nhưng danh sách vừa nạp ở bên bên trường "Tên công nhân" ở bảng "Danh sách" !!!! Em có cách làm rồi nhhưng cách này không ổn ! Vì thê các bác giúp em làm cách nào chính xác được không ạ ???

langthangIT
02-02-2004, 10:01
Bạn chỉ cần mở 2 bảng cùng một lúc và kiểm tra xem trong Bản Tiền Lương đã có những tên mới nhập chưa nếu chưa thì thêm vào.Có thể là Như thế này Nha:
Dim rs,rs1 as Recorset
dim Sql$
Set rs=db.Openrecordset("DanhSach")
Do while not rs.EOF
Sql="Select * from TienLuong Where MANV = '" & rs.MANV & "'"
set rs1=db.Openrecordset(sql)
If rs1.recordcount =0 then
rs1.AddNew
.
.
.
rs1.Update
End If
rs.MoveNext
Loop
MANV là Mã Nhân Viên của bảng Nhân viên và Tiền lương
Mình nghĩ thế này Ngắn và Thành công đấy.
langthang2t1@mail2world.com