Wstaw dane do tabeli oleDb
Pracuję nad moim pierwszym programem bazodanowym i mam problemy z aktualizacją danych wewnątrz bazy danych dostępu. Oto kod przycisku „dodaj kryteria” na stronie winform.
Dim TaxConnStr As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & ConfigurationManager.AppSettings("Database")
Dim dbConnection As OleDbConnection = New OleDbConnection(TaxConnStr)
Dim dt As New DataTable
Dim da As New OleDbDataAdapter
Try
dbConnection.Open()
Dim cmd As New OleDbCommand
cmd.CommandText = "INSERT INTO UserCriteria ( UserName, State, County, Type, Amount, Rank) VALUES ( @UserName, @State, @County, @Type, @Amount, @Rank)"
Me.DataGridView1.DataSource = dt
cmd.ExecuteNonQuery()
dt.Columns.Add("UserName")
dt.Columns.Add("State")
dt.Columns.Add("County")
dt.Columns.Add("Type")
dt.Columns.Add("Amount")
dt.Columns.Add("Rank")
dt.Rows.Add(New String() {
boxAssignTo.Text, _
boxState.Text, _
boxCounty.Text, _
boxAmount.Text, _
boxType.Text, _
boxRank.Text})
Catch ex As Exception
Finally
dbConnection.Close()
End Try
Wiem, że czegoś brakuje lub robię to źle, więc proszę o wskazówki dla twojego guru.