Problem mit OLEDbReader - In Listview werden keine aktualisierten Daten angezeigt

Question

Guten Morgen,

ich hab wieder ein kleines Problem. ich habe eine Form mit einem datetimepicker. Aus der Datenbank(Access) sollen per SQL daten abgerfuen werden, die unter dem datum gespeichert sind. Das funktioniert auch ganz gut, aber eben nur 1 x, denn beim erneuten Aufrufen der Form werden die alten Daten aus dem SQL-String erneut angezeigt. Sprich, das Datum wird nicht aktualisiert

hier mal der Code:

Dim zähler As Integer
        Dim breakagedatum As String

        breakagedatum = Format(breakagedatePicker1.Value, "short date")

        con_fub.ConnectionString =
       "Provider=Microsoft.Jet.OLEDB.4.0;" &
   "Data Source=" & lwnetz & "\fub_breakage.mdb"

        cmd.Connection = con_fub
        cmd.CommandText = "select bar,Breakage_Datum,Breakage_produkt,Breakage_Nummer from Breakage_gesamt where Breakage_Datum = ?"
        cmd.Parameters.AddWithValue("DATENOW", Format(breakagedatum, "short date"))

        con_fub.Open()

        reader = cmd.ExecuteReader()
        zähler = 0

        Breakagebuchung_ListView.Clear()
        Breakagebuchung_ListView.Refresh()
        Breakagebuchung_ListView.View = View.Details
        Breakagebuchung_ListView.FullRowSelect = True

        Breakagebuchung_ListView.Columns.Add("Bar", 100)
        Breakagebuchung_ListView.Columns.Add("Datum", 100)
        Breakagebuchung_ListView.Columns.Add("Produkt", 100)
        Breakagebuchung_ListView.Columns.Add("CO-Nummer", 100)

        Do While reader.Read
            With Breakagebuchung_ListView

                .Items.Add(reader("Bar"))
                .Items(zähler).SubItems.Add(reader("Breakage_Datum"))
                .Items(zähler).SubItems.Add(reader("Breakage_produkt"))
                .Items(zähler).SubItems.Add(reader("Breakage_Nummer"))

            End With
            zähler = zähler + 1

        Loop

        reader.Close()
        con_fub.Close()

ich hoffe, das mir jemand helfen kann. Wahrscheinlich seh ich vor lauter Sand den Starnd nicht. :-)

Answer 1

*****************************************************************************************************

Dieser Thread wurde mangels weiterer Beteiligung ohne bestätigte Lösung abgeschlossen.

Neue Rückfragen oder Ergänzungen zu diesem Thread bleiben weiterhin möglich.

*****************************************************************************************************

---

Ciprian Bogdan, MICROSOFT   Bitte haben Sie Verständnis dafür, dass im Rahmen dieses Forums, welches auf dem Community-Prinzip„Entwickler helfen Entwickler“ beruht, kein technischer Support geleistet werden kann oder sonst welche garantierten Maßnahmen seitens Microsoft zugesichert werden können.