Please can anyone assit me on what cade to add to the codes below in order to automatically save my post. Each for or post is not updated until I manually click save.
Tanks


If IsNull(Me.Comments) Then
Me.Coments = Now & ": " & Me.Tempnotes
'This line blanks out the TempNotes
Me.TempNotes = ""
Else 'If there's already data in ClientNotes this adds the new notes
' to the old
Me.Coments = Me.Coments & " " & Now & ": " &
Me.Tempnotes
'This line blanks out the TempNotes
Me.TempNotes = ""
End If
End If
End Sub