100分求救超级难题？？？？

日期，商品代码，客户
2011-8-10,301,a1
2011-8-10,302,a2
2011-8-10,303,a3
2011-8-11,301,a1
2011-8-11,303,a3
2011-8-12,307,a7
2011-8-12,303,a3
2011-8-15，307，a7
2011-8-15，302，a2
以上是数据，要求时间不是每天连续，但却是按顺序按下来的，也算是连续，现要求能在VB+access下实现查询出连续两天都有客户买入的商品代码，如上面的数据，查询的结果是
301,
303,
307,

select 商品代码 FROM saleTable GROUP BY 商品代码 WHERE 日期 BETWEEN TheDate AND TheDate+1

TheDate 你关注的日期