проверить, сохранена ли запись в под-макросе доступа - PullRequest
0 голосов
/ 29 июля 2011

У меня есть макрос Access в форме, которую я хочу использовать только для пустой записи.Как проверить, была ли сохранена запись?Свойство Me.dirty не работает для меня, потому что оно проверяет, была ли сохраненная запись изменена или изменена.

Private Sub FIND_MEMBER_AfterUpdate()
    Me.FIRST_NAME = DLookup("[FIRST_NAME]", "CM_ROSTER", "[SOC_SEC_NUM] = '" & Me.SOC_SEC_NUM & "'")
    Me.MID_INIT = DLookup("[MID_INIT]", "CM_ROSTER", "[SOC_SEC_NUM] = '" & Me.SOC_SEC_NUM & "'")
    Me.LAST_NAME = DLookup("[LAST_NAME]", "CM_ROSTER", "[SOC_SEC_NUM] = '" & Me.SOC_SEC_NUM & "'")
End Sub

У меня может быть решение:

Private Sub FIND_MEMBER_AfterUpdate()

If Me.NewRecord = True Then


Me.FIRST_NAME = DLookup("[FIRST_NAME]", "CM_ROSTER", "[SOC_SEC_NUM] = '" & Me.SOC_SEC_NUM & "'")
Me.MID_INIT = DLookup("[MID_INIT]", "CM_ROSTER", "[SOC_SEC_NUM] = '" & Me.SOC_SEC_NUM & "'")
Me.LAST_NAME = DLookup("[LAST_NAME]", "CM_ROSTER", "[SOC_SEC_NUM] = '" & Me.SOC_SEC_NUM & "'")



Else

GoTo exit_sub

End If

exit_sub:

End Sub

1 Ответ

0 голосов
/ 31 июля 2011

Похоже, что свойство, которое вы ищете, это свойство формы .NewRecord, которое имеет значение true, пока не будет сохранена новая запись.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...