Insert last record

[John liem]

I have two tables Tbl_A and Tbl_B they have the same columns, but Tbl_A has an ActID with autonumber and Tbl_B (ActID = numeric).

I have a form "Data Entry" to populate "Tbl_A", how can I do using only 1 command button: SAVED the last input data to Tbl_A and insert (append) the last input data to Tbl_B.
Tbl_B is used to capture all changes made in Tbl_A (historical data)

I am using MS Access 2000
Thanks, John.

 

[namliam]

Try searching the forum for "Audit trail" many discussions on that one...

Regards

 

[John liem]

I just want to save the new record into to Tbl_A and insert/append new record into Tbl_B, not more than that ....
John.

 

[namliam]

I presume users have to push a save-button. If so...

run the append query for the currrent key value on the form...

Regards

 

[John liem]

Thanks Namiliam, could you give me a direction how I can do it in VBA? Thanks in advance, John

 

[namliam]

Just create the append query as you would normal.

Then in the button do
Currentdb.execute "query name"

Regards

 

[John liem]

Thanks again Namliam, my problem is solved.
John

 

[John liem]

Hi Pat,

I solved this issue using:
Docmd. runSQL "UPDATE Tbl_Customer SET [Address]=(Addr) WHERE [CustID]=[Cust_ID]"

John.