I have a client table where i assign client numbers. I would like to go to the last record and add one to the client numbers.
This is my code.
Set db = CurrentDb
Set rs = db.OpenRecordset("SELECT RIGACCT FROM ClientInfo")
BacctNum = rs!RIGAcct
AcctNum = BacctNum + 1
Me.RIGAcct = AcctNum
It stopped working for me. it gets stuck on the Set rs. The error message that i get is in valid type.
Any help would be appreciated