日期比较问题！

petrak

如题，想通过一个窗体，通过输入＂起始日期＂和＂终止日期＂，把＂代号＂（也是在这个窗体上输入的）追加到另一个表中所有日期在＂起始日期＂和＂终止日期＂之间的数据．

我是这样做的：

　　　Set db = DBEngine(0)(0)

   　   Set rst1 = db.OpenRecordset("表2", DB_OPEN_DYNASET)

　   　   SuchKriterium = "BeginDat" & ">=" & Me!VDatum '& " And " & "BeginDat" & "<= " & Me![BDatum])

    　　rst1.FindFirst SuchKriterium

   　　　If Not rst1.NoMatch Then

    With rst1

  　　 While Not rst1.EOF

    .Edit

       !LFNR = Me.Auflfnr

       .Update '        rst1.FindNext SuchKriterium

       If rst1.NoMatch Then GoTo ende

   Wend

ende:

  End With

End If

rst1.Close

      Set db = Nothing

可是日期不能正确比较．大家看看，什么地方错了啊？或者有什么别的办法？先谢谢大家了！！

[em01]

海狸先生

dao 只能有一个条件吧

petrak

啊!是吗?5555555,不过还是谢谢斑竹啦,看来还是要用别的方法了.

静儿

为什么不用更新查询呢？

garyshang

学习一下