H
Howard Brody
Assuming you're using a form for order entry
(frmOrderEntry) and that each order is given an
incremental OrderID:
Include this in your Form_Open code:
Dim strLastOrder as String
dim strfilter as String
strLastOrder = DMax("[OrderID]","tblOrders")
strFilter = "[OrderID] = '" & strLastOrder & "'"
DoCmd.Applyfilter , strFilter
Hope this helps!
Howard Brody
(frmOrderEntry) and that each order is given an
incremental OrderID:
Include this in your Form_Open code:
Dim strLastOrder as String
dim strfilter as String
strLastOrder = DMax("[OrderID]","tblOrders")
strFilter = "[OrderID] = '" & strLastOrder & "'"
DoCmd.Applyfilter , strFilter
Hope this helps!
Howard Brody