Witam serdecznie,

tworzę taką aplikację w której po kliknięciu określonego przycisku były by wyszukiwane rekordy z bazy Accessa i wyświetlane w datagridview.Niestety coś mi nie wyszło i nie chcą się wybrane rekordy wyświetlać.Prosiłbym o pomoc;)
Oto kod źródłowy:

Imports System.Data
Imports System.Data.OleDb


Public Class PF
    Dim conString As String = "Provider=Microsoft.Jet.OLEDB.4.0; DataSource=c:\faktura.mdb"

    Dim con As OleDbConnection = New OleDbConnection(conString)





    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        con.Open()
        Dim Zapytanie As String = "SELECT nazwa,ilosc FROM faktura "
        Dim Polecenie As OleDbCommand = New OleDbCommand(Zapytanie, con)
        Dim AdapterKlientow As OleDbDataAdapter = New OleDbDataAdapter(Polecenie)
        Dim Dane As DataSet = New DataSet
        AdapterKlientow.Fill(Dane, "faktura")
        DataGridView1.DataSource = Dane.Tables("faktura")


        con.Close()

    End Sub
End Class 

Pozdrawiam serdecznie:)