Office中国论坛/Access中国论坛

标题: 日期比较问题! [打印本页]

作者: petrak    时间: 2005-6-30 09:34
标题: 日期比较问题!
如题,想通过一个窗体,通过输入"起始日期"和"终止日期",把"代号"(也是在这个窗体上输入的)追加到另一个表中所有日期在"起始日期"和"终止日期"之间的数据.

我是这样做的:

   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]
作者: 海狸先生    时间: 2005-6-30 16:05
dao 只能有一个条件吧
作者: petrak    时间: 2005-6-30 21:04
啊!是吗?5555555,不过还是谢谢斑竹啦,看来还是要用别的方法了.
作者: 静儿    时间: 2005-6-30 21:54
为什么不用更新查询呢?
作者: garyshang    时间: 2007-11-4 20:31
学习一下




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3