Hỏi về cách lấy field của ngày hôm trước hay 1 record trước đó

xiketuan

New Member
Hội viên mới
Mình có main form như sau :
V60.4168137_1_1.jpg


Giờ khi mình nhập ngày thừ thì dữ liệu thế này :
G50.4168167_1_1.jpg

Có nghĩa là khi mình nhập ngày thứ 2 thì cột : Skcu sẽ lấy giá trị :Skmmoi của ngày 01/11/2009. Sẽ gài bẫy khi field : xe ở thuộc after update.
Mình suy nghĩ hoài mà chưa làm ra, ai có cách nào giúp mình được không, có thể chỉ mình cách lấy số liệu của ngày trước ngày hiện tại mình đang cập nhật.

mình dùng access 2007
 
Sửa lần cuối:
Ðề: Hỏi về cách lấy field của ngày hôm trước hay 1 record trước đó

Mình có main form như sau :
V60.4168137_1_1.jpg


Giờ khi mình nhập ngày thừ thì dữ liệu thế này :
G50.4168167_1_1.jpg

Có nghĩa là khi mình nhập ngày thứ 2 thì cột : Skcu sẽ lấy giá trị :Skmmoi của ngày 01/11/2009. Sẽ gài bẫy khi field : xe ở thuộc after update.
Mình suy nghĩ hoài mà chưa làm ra, ai có cách nào giúp mình được không, có thể chỉ mình cách lấy số liệu của ngày trước ngày hiện tại mình đang cập nhật.

mình dùng access 2007

Bắt sự kiện BeforeUpdate của form. Giả sử table source của subform có tên là table2.

Code trong BeforeUpdate của Form:

Dim rs As DAO.Recordset
If Nz(xe, "") <> "" Then ' field xe không rỗng
Set rs = CurrentDB.OpenRecordset("SELECT TOP 1 sokmmoi FROM table2 WHERE xe = '" & xe & "' AND ma < '" & ma & "' ORDER BY ma DESC", dbOpenSnapshot) ' lấy ra cái sokmmoi gần nhất
On Error Resume Next
rs.MoveFirst
On Error Goto 0
If rs.RecordCount <> 0 then
sokcu = rs("sokmmoi")
End If
Set rs = Nothing
End If

Tạm thời là thế.
 
Ðề: Hỏi về cách lấy field của ngày hôm trước hay 1 record trước đó

nó báo lỗi dòng này anh ơi.
hình :
V20.4177505_1_1.jpg

Set rs = CurrentDB.OpenRecordset("SELECT TOP 1 sokmmoi FROM table2 WHERE xe = '" & xe & "' AND ma < '" & ma & "' ORDER BY ma DESC", dbOpenSnapshot) ' lấy ra cái sokmmoi gần nhất

em gửi cái file nhờ các anh giúp phát.
http://www.tanhlinh.com/Database1.zip

giúp em với.
 
Sửa lần cuối:

CẨM NANG KẾ TOÁN TRƯỞNG


Liên hệ: 090.6969.247

KÊNH YOUTUBE DKT

Cách làm file Excel quản lý lãi vay

Đăng ký kênh nhé cả nhà

SÁCH QUYẾT TOÁN THUẾ


Liên hệ: 090.6969.247

Top