Access VBAで更新履歴を追いたい

いつもお世話になっております。
製品DBより変更履歴DBを作成したいと思います。

製品F（T）は、
ID、製品、製品番号、代品製品番号、変更日があります。
そして、履歴を押したら、Fの製品番号（代理製品番号）が、
今まで、製品の製品番号と、代品製品番号の履歴を
表示させるFを作りたいのです。
※製品番号＝代品製品番号もあり。

分かりにくくてすみません。フローで言うと、

履歴クリック→Fの「製品番号」”BB”にて、
過去の「代品製品番号」の欄を検索
→検索結果がなければ、履歴F（別フォーム）
　”BB”の「製品番号」「代品製品番号」を表示
→あれば今度は、
　「製品番号」にて、「代理製品番号」を検索

という感じで、別ウィンドウを開き、
履歴を表示したいのです。

どうに記入すればいいのかわからず
右往左往しています。
どうかお助けいただきたくお願いいたします。

No.1 ベストアンサー 回答者： tksoft 回答日時： 2003/10/18 11:23

フローに書いてある通りに作ればよいんじゃないでしょうか？

もう少し、具体的にどこが分からないのか書けば解答がつきやすいようにも思いますが、とりあえず。

テーブルを開くのは
　　Dim DB As Database
　　Dim RC As Recordset
　　Set DB = CurrentDb
　　Set RC = DB.OpenRecordset("テーブル名")

開いたテーブルで検索するのは
　　RC.FindFirst "検索条件"

検索したレコードが見つかったらNoMatchプロパティがFalseになり、当該レコードがカレントレコードになります。続けて同条件で検索続行するのはFindNext、レコードを最後まで検索すると、EOFプロパティがTrueになります。

とりあえず、こんなところでどうでしょうか？

この回答へのお礼

御礼が大変遅くなり申し訳ありません。
どうもありがとうございました。
とても分かりやすく書いていただき助かりました。

といってもまだ試せていないので、
又、またなにかあったらよろしくお願いいたします。

お礼日時：2003/11/27 17:51