| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]在FIND中再加一个日期条件 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=127309) |
| -- 作者：明天的灵 -- 发布时间：2018/11/10 19:03:00 -- [求助]在FIND中再加一个日期条件 \'找出最后一次这个操作台的记录语句为： 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 -- 发布时间：2018/11/10 21:31:00 -- dr = DataTables("每日工作量").Find("操作台 = \'" & dd & "\' and _Identify < " & e.DataRow("_Identify") & "\' And 操作日期 < #" & Date1 & "#" ,"操作日期 Desc" ) |
| -- 作者：明天的灵 -- 发布时间：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编辑过]
|