update memo field after report(letter) runs (1 Viewer)

[mrrayj60]

I send a letter from my form via a control button, now I would like to add/update the memo that a letter was sent to this owner. I think I need an update query but I'm not sure where I should add it, after the report/letter prints or a seperate control? Suggestions?
Thanks, Ray

Dim stDocName As String
Dim strWhere As String
strDocName = "ltrCutTrees"
strWhere = "[Residents]![Recordid]=" & Me!txtrecordid2
DoCmd.OpenReport strDocName, acPreview, , strWhere

stDocName = "ltrCutTrees"
DoCmd.OpenReport stDocName, acPreview