使用環境
ＷＩＮＤＯＷＳＸＰ
ｖｉｓｕａｌｂａｓｉｃ ＥＥ
いつもお世話になっています。
ｏｌｅｄｂｄａｔａａｄａｐｔｅｒを使用したデータベース更新を考えており、下記コードにて、データバインディングするところまで完成しました。
Dim Cn As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\sekisan.mdb")
Dim da As OleDb.OleDbDataAdapter = New OleDb.OleDbDataAdapter("SELECT * FROM meisai_master", Cn)
Dim ds As DataSet = New DataSet("meisai_master")
da.Fill(ds, "meisai_master")
Me.BindingSource1.DataSource = ds
Me.BindingSource1.DataMember = "meisai_master"
DataGridView2.DataSource = BindingSource1
このコードにて、既存データベースのテーブル（meisai_master）をデータグリッドビューに表示することはできるのですが、データグリッドビューのデータを編集した際の更新方法に疑問点があります。プログラム上ではなくデザイナ等で構築した更新方法は、データベースエクスプローラにて接続先を確立させ、それに伴いデータセットを作成しますよね。そして、データセットされたデータグリッドビューをﾌｫｰﾑに配置すれば、主キーさえ設定したテーブルであれば、コマンドビルダーにてコマンドを自動生成できます。そして、更新もボタン一つでＯＫです。
結局、プログラム上でも同様のことをしたいわけですが、更新コードを下記コードのようにしました。
Dim Cn As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Sourcec:\sekisan.mdb")
Dim da As OleDb.OleDbDataAdapter = New OleDb.OleDbDataAdapter("SELECT * FROM meisai_master", Cn)
Dim ds As DataSet = New DataSet("meisai_master")
Dim cb As OleDb.OleDbCommandBuilder = New OleDb.OleDbCommandBuilder(da)
da.Fill(ds, "meisai_master")
*＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊
ここです！！！！！
*＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊
Try
Validate()
BindingSource1.EndEdit()
da.Update(ds, "meisai_master")
Catch ex As System.Exception
System.Windows.Forms.MessageBox.Show(ex.Message)
End Try
これでは、更新するテーブルの器部分は出来ても、肝心な新しい編集データが保存できていないことになります。そこで、質問です。
コード中の＊＊＊＊＊の部分に直接編集データ等をコーディングしないで、バインディングされたデータグリッドビューのデータで更新したい場合、どのようにすればよいのでしょうか？
