I have the following script which updates fields in a table.
What I am after is a msgbox script to list the ID field value once it is updated.
What I am after is a msgbox script to list the ID field value once it is updated.
Code:
Set rec = dbs.OpenRecordset("Select * from Stk_Merge_Delete_Register")
rec.AddNew
rec("StkItemID") = [Forms]![MergeItem]![txtStkFrom]
rec("RackID") = [Forms]![MergeItem]![txtRackFrom]
rec("BayID") = [Forms]![MergeItem]![txtBayFrom]
rec("ShelfID") = [Forms]![MergeItem]![txtShelfFrom]
rec("PlaceID") = [Forms]![MergeItem]![txtPlaceFrom]
rec("DeletedFromLoc") = "Deleted From Location"
rec.Update
[B][COLOR=Red]msgbox"Your new record number is:" & Stk_Merge_Delete_Register!ID[/COLOR][/B]