[求助]在FIND中再加一个日期条件 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]在FIND中再加一个日期条件

共有1993人关注过本帖树形打印复制链接主题：[求助]在FIND中再加一个日期条件

明天的灵

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：一尾狐帖子：400 积分：4856 威望：0 精华：0 注册：2017/2/7 7:41:00

[求助]在FIND中再加一个日期条件 发帖心情

Post By：2018/11/10 19:03:00 [只看该作者]

'找出最后一次这个操作台的记录语句为：

dr = DataTables("每日工作量").Find ("操作台 = '" & dd & "' and _Identify < " & e.datarow("_Identify"),"操作日期 Desc")

‘现需再增加一个条件，找出当前“操作日期”前最后一次这个操作台的记录

Dim date1 As Date = e.DataRow("操作日期")

dr = DataTables("每日工作量").Find("操作台 = '" & dd & "' and _Identify < " & e.DataRow("_Identify") And 操作日期 < #" & Date1 & "#" ,"操作日期 Desc" )

上面这条语句通不过，能帮忙改一下吗？

[此贴子已经被作者于2018/11/10 19:28:23编辑过]

y2287958

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：狐神帖子：4752 积分：34568 威望：0 精华：0 注册：2008/8/31 22:44:00

Post By：2018/11/10 21:31:00 [只看该作者]

dr = DataTables("每日工作量").Find("操作台 = '" & dd & "' and _Identify < " & e.DataRow("_Identify") & "' And 操作日期 < #" & Date1 & "#" ,"操作日期 Desc" )

明天的灵

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：一尾狐帖子：400 积分：4856 威望：0 精华：0 注册：2017/2/7 7:41:00

Post By：2018/11/10 22:36:00 [只看该作者]

还有错：

详细错误信息：

Exception has been thrown by the target of an invocation.

The expression contains an invalid string constant: ' And 操作日期 < #2018-11-06#.

再去掉一个‘ 就正常了，谢谢！

[此贴子已经被作者于2018/11/10 22:38:23编辑过]

主题：[求助]在FIND中再加一个日期条件