タイトル : Re^2: DAOで重複している商品レコードにフラグを立てたい 投稿日 : 2012/11/07(Wed) 10:23 投稿者 : ep
> SELECT 商品コード FROM テーブル GROUP BY 商品コード HAVING COUNT(*) >= 2 > > のような SQL を使えば、重複している商品コードを取り出せるので、 > これと繋いで UPDATE してやれば、フラグを更新できるかと。 ご回答ありがとうございます。 商品コード以外にフレキシブルグリッドにフィールドを表示したいと、 Dim Db As Database Dim Res As Recordset strSQL = "SELECT 商品ID,商品コード,商品名 FROM 商品情報 GROUP BY 商品コード HAVING COUNT(*) >= 2" Set Db = OpenDatabase(ItemPath) Set Res = Db.OpenRecordset(strSQL, dbOpenDynaset) Set Data1.Recordset = Res Res.Close Db.Close Set Db = Nothing Set Res = Nothing Set Data1.Recordset = Nothing してみたのですが、「集計関数の一部として'商品ID'を含んでないクエリを実行使用としました」とエラーが出ます。 よい方法をお教えいただけないでしょうか。 よろしくお願いいたします。 |