|
いつも、参考にさせていただいてます。
さっそくですが、ご指導いただきたく、投稿しました。
2つのテーブル
T_BBB
T_CCC
この2つのテーブルのフィールド名は、全く同じですが
フィールドの数が、110程あります。
2つのテーブルの中身データの照合をし
一致したデータと、T_BBBのみしかないデータ、T_CCCしかないデータの
各テーブルを作成したく
下記の様なのを作ってはみたものの、、、
Dim TB_BBB As DAO.Recordset 'レコードセットの変数
Dim TB_CCC As DAO.Recordset
Set TB_BBB = DB.OpenRecordset("Select * from BBB;") 'テーブルBBB全て
While TB_BBB.EOF = False
strSQL = "SELECT CCC.* FROM CCC "
strSQL = strSQL & "WHERE (((CCC.品番)='" & TB_BBB![品番] & "') "
strSQL = strSQL & " AND ((CCC.ロット)='" & TB_BBB![ロット] & "') "
・
・
・
strSQL = strSQL & " AND ((CCC.数量)='" & TB_BBB![数量] & "'));"
こんな感じで、110件ほど書きましたが条件が多すぎるのか、【クエリが複雑】と、なってしまいできません
件数が大量の場合の処理の仕方教えてください
宜しくお願い致します
|
|