DataAdapterで削除、追加(一部編集の上で・・)の実行について (ID:145290)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

Fillの使い方、間違えたままではありますが、
下記のようにして、目的のテーブルを得ることは出来ました。

cn1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strMDBPath
                cn1.Open()
                cmd1 = cn1.CreateCommand()
                cmd1.Connection = cn1
                oTrans1 = cn1.BeginTransaction
                cmd1.Transaction = oTrans1

Adapt1 = New OleDb.OleDbDataAdapter("DELETE FROM work商品マスタ", cn1)
                Adapt1.SelectCommand.Transaction = oTrans1
                Adapt1.Fill(ds, "work商品マスタ")

Adapt2 = New OleDb.OleDbDataAdapter("INSERT INTO work商品マスタ SELECT 商品マスタ.部品番号 AS NT品番, 商品マスタ.住友コード FROM 商品マスタ WHERE (((商品マスタ.仕入先コード)=1) AND ((商品マスタ.NTコード)<>0))", cn1)
                Adapt2.SelectCommand.Transaction = oTrans1
                Adapt2.Fill(ds, "work商品マスタ")

Adapt3 = New OleDb.OleDbDataAdapter("SELECT * FROM work商品マスタ", cn1)
                Adapt3.SelectCommand.Transaction = oTrans1
                Adapt3.Fill(ds, "work商品マスタ")

oleCom = New OleDb.OleDbCommandBuilder(Adapt3)
                dt = ds.Tables("work商品マスタ")
                For j As Integer = 0 To dt.Rows.Count - 1
                    strField = CStr(dt.Rows(j)("NT品番")).Replace("-", "")
                    dt.Rows(j)("NT品番") = strField.Replace(" ", "")
                Next
                Adapt3.Update(ds, "work商品マスタ")
                Adapt1.Dispose()
                Adapt2.Dispose()
                Adapt3.Dispose()

一つのDataAdapterだけ(「InsertCommand」「DeleteCommand」の使用？)で、
コードを書く方法が分からず・・です。

←解決時は質問者本人がここをチェックしてください。

戻る