C# と VB.NET の質問掲示板

ASP.NET、C++/CLI、Java 何でもどうぞ

C# と VB.NET の入門サイト

Re[6]: 仮.mdb ～本.mdbへ一括更新

分類:[VB.NET/VB2005 以降]　

VS2008-VB
お世話になってます。
手法について何か良いものがあれば教えてください。

タイトルの通り、.mdbをDBとし、複数人で共有するシステムを開発しているのですが、

システムにログインした時に、ユーザーPCに仮のmdbを作成し、同時に本mdbから特定ユーザーの全データを格納する。
システム使用中は、仮mdbを操作(INSERT,UPDATA,DELETE)し一括で更新させようと考えています。

そこで、私自身が考えられることは、仮mdbの内容を本mdbに一括で更新する際、一度、本mdbにある特定ユーザーのデータを全て削除
仮mdbの内容をすべてINSERTする。という事くらいしか発想できません。

しかし、実際ユーザーがINSERT,UPDATA,DELETEを全くしないとも限らなく、また、1、2件のデータ操作で終わることもあり得ます。
そんなとき上記の手法を使うのも危険な気がして悩んでおります。

なにか良い手法やアドバイスがありましたらご教授いただけると助かります。
よろしくお願いします。

ハイペースですねえ。

■No41210 (相変わらずさん) に返信
> ハイペースですねえ。

^^;　1時間2時間と考えて、調べてとそれで無理ならここが一番だと思っておりまして...
おかげ様で9割9分9厘は解決させて頂いておりますm_ _m

> 雑談（先輩方どんどん加筆してね）のトピ～ (改訂4版）初心者のプログラミングの学び方
> 5「自調自考」(知らないこととわからないことを見極める。どうしてもわから
> ないときにはアドバイスを受ける。でも「教えて君」にならないように留意する。また、質問の仕方を他の掲示板で学ぶ。）

心が痛いです^^;

今後ともよろしくお願いします。

> なにか良い手法やアドバイスがありましたらご教授いただけると助かります。

# アイデア留まりではありますが

オペレーションを記憶しておくことはできませんか?
つまりlocal-DBに対してどんな操作を行ったかをログに残しておき、
master-DBに対しログに残る操作と同じことをすれば復元できる"はず"ですよね。

■No41218 (επιστημη さん) に返信
> オペレーションを記憶しておくことはできませんか?
> つまりlocal-DBに対してどんな操作を行ったかをログに残しておき、
> master-DBに対しログに残る操作と同じことをすれば復元できる"はず"ですよね。

このlocalやmasterの概念は、mdbにもあるって事を意味しているのでしょうか？
SQLserverで聞いたことあるような...

> このlocalやmasterの概念は、mdbにもあるって事を意味しているのでしょうか？

違います。あなたの表現に合わせれば local=仮 master=本です。

■No41250 (επιστημη さん) に返信

> 違います。あなたの表現に合わせれば local=仮 master=本です。
なるほど...失礼いたしました；

> つまりlocal-DBに対してどんな操作を行ったかをログに残しておき、
アドバイスをヒントに仮mdbには、新規flg、更新flg、削除flgのフィールドを追加。
システム使用中、データを更新した際、その処理に合わせてflgをTrueに変更。
一括更新時、仮mdbから、新規flg、更新flg、削除flgがTrueのなったものだけを抽出し以下のように更新されたレコードのみの処理。

Dim mCn As OleDb.OleDbConnection = New OleDb.OleDbConnection() 'master-DBコネクション用
Dim tCn As OleDb.OleDbConnection = New OleDb.OleDbConnection() 'local-DBコネクション用

mCn.Open()
tCn.Open()

Dim Ds As DataSet= New DataSet("Table")
Dim Da As OleDb.OleDbDataAdapter = New OleDb.OleDbDataAdapter("SELECT * FROM Table WHERE 新規flg=True Or 更新flg=True Or 削除flg=True", tCn)
Da.Fill(Ds, "Table")
Dim Dt As DataTable = Ds.Tables("Table")
For Each Drow As DataRow In Dt.Rows
　　　　'SQL文分岐
　　　　If Drow.Item("削除flg") = True Then
　　　　　　　　SQL = "DELETE FROM Table"
　　　　Else
　　　　　　　　If Drow.Item("新規flg") = True Then
　　　　　　　　　　　　SQL = "INSERT INTO Table..."
　　　　　　　　Else
　　　　　　　　　　　　SQL = "UPDATE Table SET フィールド = ..."
　　　　　　　　End If
　　　　End If
　　　　Dim Cm As OleDb.OleDbCommand = New OleDb.OleDbCommand(SQL, mCn)
　　　　Cm.ExecuteNonQuery()
Next
mCn.Close()
tCn.Close()

どうでしょうか？

> どうでしょうか？

なんと答えりゃいいんだろ...
期待する結果が得られるならそれでいいんじゃありません?

■No41256 (επιστημη さん) に返信
> 期待する結果が得られるならそれでいいんじゃありません?

いつもありがとうございます。
期待する結果が得られました！

また何かあった時はよろしくお願いします。

C# と VB.NET の質問掲示板

ASP.NET、C++/CLI、Java 何でもどうぞ

C# と VB.NET の入門サイト

Re[6]: 仮.mdb ～ 本.mdbへ一括更新

過去ログには書き込み不可

Re[6]: 仮.mdb ～本.mdbへ一括更新