Erzeugter Inhalt von Label an Access Datenbank übergeben

[werner_sg]

Hallo hänge jetzt schon ein paar Tage am Problem in einer Windows Form VB.net mit Visual Studio 2017, den über einen Klick erzeugten integer Wert direkt in eine Datenbank zu schreiben.

Die Datenbank verfügt über nur eine Zeile welche immer wieder mit aktuellem Zählerstand aktualisiert werden soll

Alle Erklärungen von MS liefern Fehler oder sind einfach nicht nachvollziehbar und beziehen sich nur auf das lesen, ändern und speichern in einer Tabelle.

Gehört eventuell nicht direkt hier rein da es sich aber um ein Datenbankproblem handelt ist hier eventuell jemand bei der den richtigen Ansatz zur Lösung kennt.

Eventuell so erklärt das es auch jemand versteht der nur alle paar Jhre mal so ein Projekt macht und von dem ganze hin und her jetzt total verwirrt ist und erst mal wieder einen greifbaren Faden braucht.

Hier mal mein Code von einer Seite (Form)

Public Class Anfang


    Private B1 As Integer
    Private B2 As Integer
    Private B3 As Integer

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

        B1 = 0
        B2 = 0
        B3 = 0

    End Sub


    Private Sub Button1_MouseDown(sender As Object, e As MouseEventArgs) Handles Happy.MouseDown
        B1 = B1 + 1
        Label1.Text = B1

    End Sub
    Private Sub Button2_MouseDown(sender As Object, e As MouseEventArgs) Handles neutral.MouseDown
        B2 = B2 + 1
        Label2.Text = B2
        Ursache1.Show()
        Me.Hide()
    End Sub
    Private Sub Button3_MouseDown(sender As Object, e As MouseEventArgs) Handles notHappy.MouseDown
        B3 = B3 + 1
        Label3.Text = B3
        Ursache1.Show()
        Me.Hide()
    End Sub

    Private Sub Panel1_Paint(sender As Object, e As PaintEventArgs) Handles Panel1.Paint

    End Sub

    Private Sub Happy_Click(sender As Object, e As EventArgs) Handles Happy.Click

    End Sub

    Private Sub Button4_MouseDown_1(sender As Object, e As MouseEventArgs) Handles anmeldung.MouseDown
        Passwort.Show()

    End Sub

    Private Sub Abfrage_Click(sender As Object, e As EventArgs) Handles anmeldung.Click

    End Sub


    Private Sub Label1_Click(sender As Object, e As EventArgs) Handles Label1.Click



    End Sub
End Class

Auf Click eines Button wird der Zähler um 1 erhöht und derzeit im Label angezeigt dieser soll aber weg und der Eintrag soll in einem Datenbank Feld erfolgen.

für diese Form wären das die Felder 1, 2 und 3

Die Access Datenbank TelMe.accdb liegt im Projektordner

Die folgenden Seiten sind ähnlich aufgebaut haben nur noch einen Timer dabei

Das ganze Projekt läuft ansich auch das Auslesen der Datenbank in einer anderen Form

nur mit dem Speichern des erzeugten Wertes in die Datenbank überfordert mich echt.

 

[Yaslaw]

Ich kenne mich mit VB.NET nicht aus. Aber mit VBA, VB6 und vor allem mit Access.
Wo in deinem Code schreibst du in die Datenbank?
Wie ist die Datenbank angebunden. Jet (ADODB) oder DAO oder ODBC?
Und was funktioniert nicht? Kommt eine Fehlermeldung? Wenn ja, wie lautet sie?

Grundsätzlich kannst du einfach ein Updatesqlscript an dieDB senden.

UPDATE my_table SET my_Counter_field = 1234