none
ExecuteReader: Connection-Eigenschaft wurde nicht initialisiert

    Allgemeine Diskussion

  • Hi

    ich greife auf eine Access Datenbank zu. Jetzt wollte ich die Datensätze mit OleDataReader in einer msg-Box ausgeben lassen. Mein Problem das der  ExecuteReader nicht initialisiert wird. Hab schon einen ähnlich Thread hier gelesen aber komm nicht weiter. Hoff ihr könnt mir helfen.

    Hier mein Code:

    Imports System.Data
    Imports System.Data.OleDb
    
    Public Class BDinfo
        Public Dataset As New DataSet
        Public Connection As New OleDbConnection()
        Public Command As OleDbCommand
        Dim tabelle As String
        Private Sub BDinfo_Load(sender As Object, e As EventArgs) Handles MyBase.Load
            Connection.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=Access_Uebung23_Loesung.mdb;"
        End Sub
     Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
            Connection.Open()
            tabelle = ListBox1.SelectedItem
            Command = New OleDbCommand
            Command.Connection = Connection
            Command.CommandText = "select * from " + tabelle
            DataGridView1.DataSource = Connection.GetOleDbSchemaTable(OleDbSchemaGuid.Columns, _
                 New Object() {Nothing, Nothing, tabelle, Nothing}
            Dim Reader As OleDbDataReader = Command.ExecuteReader()
            While Reader.Read
                MsgBox(Reader.Item(0) & "-" & Reader.Item(1))
            End While
            Reader.Close()
            Command.Dispose()
            Connection.Close()
        End Sub
    End Class

    mfg Psywalker

    Mittwoch, 8. Januar 2014 11:59

Alle Antworten