Hinzufügen neuen Datensatz in der Tabelle durch klicken auf die Schaltfläche in Microsoft Access

In meinem MS Access-Formular möchte ich die Implementierung einer eigenen Schaltfläche fügt einen neuen Datensatz in der Tabelle. Damit zu tun, dass ich noch einen Knopf und an diese Schaltfläche ein Ereignis:

Private Sub btnAddRec_Click()
    Refresh
    With CodeContextObject
    On Error Resume Next
    DoCmd.GoToRecord , , acNewRec
    If Err.Number <> 0 Then
    btnAddRec.Enabled = False
    End If
    End With
End Sub

Alles ist OK, wenn Sie nur öffnen Sie das Fenster und klicken Sie auf die btnAddRec button, das problem ist, wenn du als erstes führen Sie die navigation in den Aufzeichnungen existierten und nur nach einem Klick auf diese Schaltfläche. Ich habe den runtime error: 2105: «Sie können nicht zu dem angegebenen Datensatz. Sie kann sich am Ende eines Recordsets».

Wie das Problem zu lösen, muss ich die Möglichkeit haben, um den neuen Datensatz auf, klicken Sie auf die spezielle Schaltfläche, egal, ich ging oder nicht ging durch die Datensätze vor.

  • Was ist CodeContextObject?
InformationsquelleAutor Mike B. | 2013-05-18
  1. 1

    Erstellte ich ein einfaches Formular mit einem Feld Anrufe Beschreibung (und AutoWert) und erstellt eine Schaltfläche mit dem code, der folgt auf Ereignis. Ich füllte es mit einer Anzahl von Aufzeichnungen und navigiert sich durch Sie, dann auf die addNewRec-Taste. Das Formular navigiert, um den neuen Datensatz ohne Probleme. Ich war auch in der Lage, klicken Sie auf die addNewRec-Taste direkt nach dem öffnen der form erfolgreich.

    Private Sub btnAddRec_Click()
On Error GoTo Err1
  DoCmd.GoToRecord , , acNewRec
  Exit Sub
Err1:
  Description.SetFocus
  btnAddRec.Enabled = False
  MsgBox (Err.Description)

End Sub

    Die Unterschiede von dem code, den Sie enthalten waren, entfernen Sie die refresh-und With-Anweisung, die übergabe der Fehler, Fokus setzen, bevor Sie die Schaltfläche deaktivieren, und zeigt dem Benutzer die Fehler-Beschreibung. Ich weiß nicht, ob Ihre form ist ähnlich, aber dies sollte für Sie arbeiten, wenn es ist, und ich dein problem richtig verstanden.

    • Ich habe versucht den code und heraus gefunden, dass versuchen, das Formular zu öffnen, zu Fuß nach vorne für einige Datensätze und klicken Sie anschließend auf die Schaltfläche hinzufügen, ich hab den Fehler.
    • Dies ist sehr einfach und der code funktioniert gut für mich. Wenn Sie zeigen alle den code in dem Formular, sollte dies funktionieren. Vielleicht sollten Sie beginnen, über. Das Formular neu und dieses mal, wenn Sie hinzufügen, die addNewRec button, aus dem Befehlsschaltflächen-Assistenten, wählen Sie "Datensatz-Operationen" und "Neuen Datensatz Hinzufügen".
    InformationsquelleAutor ron tornambe
Schreibe einen Kommentar