>>885
サンクスです。885さんのコードで動きましたがどうもわからないのが、
"Between XX and YY" で、この場合YYにはDate関数をそのまま使っている
ので日付型。XXにDateSerialの戻り値をそのまま使うとダメで、
CStrで一旦文字列に直してから #Cstr()# と#ではさんでから日付型に
直すとうまくいく。どうもここらへんが変数の型があるようでないVBScript
のイヤなところなんですが、
from_date = DateSerial(2002, 6, 1)として
from_date と #CStr(from_date)# との間に違いがあるのでしょうか？