Thema Datum  Von Nutzer Rating
Antwort
Rot Fehler bei Access Runtime
02.12.2022 14:22:29 gurki
NotSolved

Ansicht des Beitrags:
Von:
gurki
Datum:
02.12.2022 14:22:29
Views:
387
Rating: Antwort:
  Ja
Thema:
Fehler bei Access Runtime

Tag zusammen, ich habe ein Problem mit einer kleinen Access-Datenbank die ich über Access Runtime öffne. Es treten dort nämlich Fehler auf, die in der Vollversion von Access nicht auftreten, leider finde ich nicht die Ursache dafür.

Erstmal einen Überblick der Datenbank. Die Datenbank verwaltet Kunden und Verträge zu den Kunden.

 

Es bestehen 2 Probleme. Das erste Problem tritt direkt beim Öffnen der DB in der Runtime auf, und das zweite während der Nutzung wenn ich einen neuen Vertrag anlegen will.

 

1. Problem: beim Öffnen der Datenbank (Doppelklick auf die accdb-Datei) gibt Access den Fehlercode „29070“ aus. Beim Klick auf „OK“ öffnen sich mein Formular „Kunden“ wie gewohnt und scheint erstmal zu funktionieren.

 

2. Problem: Beim Klicken auf den Button „Vertrag Erstellen“ im frmKunden tritt folgender Fehler auf: „Die Ausführung dieser Anwendung wurde wegen eines Laufzeitfehlers angehalten. Die Anwendung kann nicht weiter ausgeführt werden und wird beendet.“

Beim Klicken des Buttons, soll das frmVertraege geöffnet werden, um einen Vertrag für den Kunden anzulegen. Dabei wird die KdNr des Kunden mit an das frmVertraege übergeben.

Der Code hinter dem Button „Vertrag erstellen“ (frmKunden):

Private Sub cmdVertragErstellen_Click()
On Error GoTo Err_cmdVertragErstellen_Click
DoCmd.OpenForm "Verträge", , , , , , Me.KdNr.Value
Exit Sub
Err_cmdVertragErstellen_Click:
MsgBox "Es ist ein Fehler aufgetreten" & vbCr & "Fehlercode: " & Err.Number & vbCr & Err.Description
End Sub

Folgender Code wird beim Start des frmVertraege ausgeführt:

Private Sub Form_Load()
Dim strAktuellerDatensatz As String
Dim strDatensatzGesamt As String
strAktuellerDatensatz = Me.CurrentRecord
strDatensatzGesamt = DCount("VNr", "Verträge")

  If Not IsNull(Me.OpenArgs) Then   
  Call cmdNeuenVertragAnlegen_Click
    Me.KdNr = Me.OpenArgs
  End If
End Sub

Wie gesagt, in der Vollversion von Access (2016) bzw. Office auf meinem PC funktioniert alles. Die Probleme tauchen bei meinem Test-PC auf wo die Access Runtime (2016) installiert ist.

 

Weiß jemand des Rätsels Lösung? Ich weiß nicht wie ich da weiter vorgehen soll.

Würde mich sehr um Unterstützung freuen!


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Fehler bei Access Runtime
02.12.2022 14:22:29 gurki
NotSolved