On Error GoTo ErrHandler
Me.total = Nz(DLookup("total", "QryExtraMoney", "ID_R=" & [ID_R]), 0)
Me.Massarif = Nz(DLookup("total2", "QryExtraMoney", "ID_R=" & [ID_R]), 0)
ErrHandler:
If Err.Number = 3075 Then
Me.total = ""
Me.Massarif = ""
End If
جمعية20.rar