ボタンを押したときにAccessデータベースから選択されたデータを表示しようとしましたが、VB.NET:アクセスデータベースから選択したデータをデータグリッドビューに表示できません
Dim third_da As OleDb.OleDbDataAdapter
Dim third_ds As New DataSet
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
con.Open()
Dim cb_two As New OleDb.OleDbCommandBuilder(third_da)
query_three = "SELECT emp_timing.emp_code, emp_timing.day, emp_timing.travel_time, emp_timing.travel_dest,emp_timing.emp_timein,emp_timing.emp_timeout, emp_timing.emp_hours, emp_timing.emp_mins " & _
"FROM emp_timing WHERE (((emp_timing.emp_code)=" & empcode & ") AND ((emp_timing.day) Like '??/" & ComboBox1.Text & "/20" & TextBox9.Text & "'))"
' "WHERE (((emp_timing.emp_code)=22) AND ((emp_timing.day) Like '??/05/2016'))"
third_da = New OleDb.OleDbDataAdapter(query_three, con)
third_da.Fill(third_ds, "ets")
DataGridView1.DataSource = third_ds.Tables("ets")
con.Close()
Dim view As New DataView(third_ds.Tables(0))
source1.DataSource = view
DataGridView1.DataSource = view
DataGridView1.ReadOnly = True
DataGridView1.CancelEdit()
End Sub
ありがとうございました!
あなたが設定しましたブレークポイントとステップスルー?また、パラメータを使用してOption Strictをオンにします。 – Codexer
クエリがデータを取得するかどうかを確認しますか? –
あなたのコードは、SQLインジェクション[詳細については、bobby-tables.comをチェック](http://bobby-tables.com)に対して脆弱です。これを防ぐためにパラメータ化クエリを使用してください。あなたはデバッグし、正確に何がうまくいかないかチェックしますか?データベースは接続されていますか? SQLは正しく生成されていますか?生成されたSQLはAccessで正しく実行されていますか? – Spidey