why does it not work occasionally?

[Cong]

I have a main form (Main-member) with a cancel button. When user
click on the button, it open up another form (Frame40) and the user can
choose a cancel option and double click to close. But occasionally
the first 4 lines does not get executed. Does this has to do requery
issue?

Private Sub Frame40_DblClic k(Cancel As Integer)
On Error GoTo Err_Frame40_Dbl Click
Dim rst, rst1 As DAO.Recordset
Me.DATECANCEL = Format(Now, "mm/dd/yy") 'form main_member
Me.CANCELS = True 'form
main_member
Me.csrID = CurrentUser() 'form
main_member
Me.cancellati = [conf] + [csrID] + Format(Now, "mm/dd/yy")
'form main_member
Set rst = CurrentDb.OpenR ecordset("Daily Report", dbOpenDynaset)
With rst
rst.AddNew
rst!conf = conf
rst!csrID = CurrentUser
rst!cxlreason = Me.Frame40
rst.Update
End With
rst.Close
Set rst = Nothing
With Forms![MAIN-members].Child135.Form
Set rst1 = .RecordsetClone
rst1.AddNew
rst1!conf = conf
rst1!csrID = CurrentUser
rst1!csdate = DATE
rst1!comments = "cxl"
rst1.Update
rst1.Bookmark = rst1.LastModifi ed
End With
rst1.Close
Set rst1 = Nothing
DoCmd.Close acForm, "cancel", acSaveYes
Exit_Frame40_Db lClick:
Exit Sub
Err_Frame40_Dbl Click:
MsgBox Err.Description
Resume Exit_Frame40_Db lClick
End Sub