Further to jzwp11 comment re reserved words, you should post all of the related code when showing code. Where are your Dim statements? Do you use Option Explicit in modules -- that will eliminate spelling errors etc.
What error do you get, if any?
When you use recordCount, you should move to the last record to ensure you are getting a correct reading.
Debug.Print "RecordCount is " & Rset.RecordCount
Could you describe your business process generally to help us understand the TotalTill at End of Day?
Have you considered a Transaction table where money in (received +) and money out(paid -) are recorded as Transaction records. At the end of day (or anytime) you can run a query to Sum the transactions by Date(period) to get the TotalTally? Just a thought.
Not everyone can access an accdb, you may reach a broader audience by attaching in mdb format.