| |
| Hallo liebe Leute,
Habe ein Problem mit Access. Ich möchte in einem Unterfomular einen neuen Datensatz hinzufügen, dafür habe ich mir den Code "Bei nicht in der Liste eines Kombis " kopiert und angepasst. Aber die Requery funzt nicht.
Die Requery wird in dem Unterformular ausgeführt. Bei mehreren Versuchen kam die Fehlermeldung er kann die M_Nr nicht finden. Bei letzten Versuch wurde ein vorhandene Datensatz überschrieben. Was ist hier falsch????
Hier der Code den ich verwende:
Private Sub Merkmal_NotInList(NewData As String, Response As Integer)
If MsgBox("Das Mrkmal ist neu. Möchten Sie es anlegen?", vbYesNo) = vbYes Then
Response = acDataErrContinue
DoCmd.OpenForm "FO_Neues_Merkmal", , , , acFormAdd
Forms!FO_Neues_Merkmal!Merkmal = NewData
Else 'z.B. bei Tippfehler
Response = acDataErrContinue
Me!Merkmal.Undo
End If
'************** CODE ENDE **************
Beim Schließen des Eingabeformulars:
Forms!FO_AT_Eingabe!UF_AT_Daten.Form!Merkmal = Me!M_Nr
Forms!FO_AT_Eingabe!UF_AT_Daten.Form!Merkmal.Requery
DoCmd.Close
| |
|
