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:)