Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]自动提示并显示到期的行


  共有1770人关注过本帖树形打印复制链接

主题：[求助]自动提示并显示到期的行
帅哥哟，离线，有人找我吗？
webccc
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：20 积分：256 威望：0 精华：0 注册：2015/4/7 13:05:00 		[求助]自动提示并显示到期的行  发帖心情 Post By：2017/11/8 14:38:00 [只看该作者]

我在项目事件中的AfterOpenProject的代码如下：
Dim dt As Date = Date.Today
Dim flt1 As String = "开始日期 > #" & dt & "#"
Dim flt2 As String = "结束日期 < #" & dt & "# and 是否已完成 = false"
Dim dr As DataRow = DataTables("日常工作").find(flt1 & flt2)
If dr IsNot Nothing Then
   messagebox.show("有事项提醒!","提示",messageboxbuttons.ok,messageboxicon.Information)
   Tables("日常工作").filter = flt1 & flt2
   MainTable = Tables("日常工作")
End If

提示如下：
.NET Framework 版本：2.0.50727.8794
Foxtable 版本：2017.10.26.1
错误所在事件：项目,AfterOpenProject
详细错误信息：
语法错误:“结束日期”运算符后缺少操作数。
重新打开项目后也没有收到messagebox的提示信息，请问代码是哪里错了吗？
麻烦各位老师看一下!
[此贴子已经被作者于2017/11/8 14:39:29编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2017/11/8 14:44:00 [只看该作者]

 

Dim dt As Date = Date.Today
Dim flt1 As String = "开始日期 > #" & dt & "#"
Dim flt2 As String = " and 结束日期 < #" & dt & "# and 是否已完成 = false"
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2017/11/8 14:45:00 [只看该作者]

Dim dt As Date = Date.Today
Dim flt1 As String = "开始日期 > #" & dt.adddays(-10) & "#"
Dim flt2 As String = " and 结束日期 < #" & dt & "# and 是否已完成 = false"
Dim dr As DataRow = DataTables("日常工作").find(flt1 & flt2)
If dr IsNot Nothing Then
   messagebox.show("有事项提醒!","提示",messageboxbuttons.ok,messageboxicon.Information)
   Tables("日常工作").filter = flt1 & flt2
   MainTable = Tables("日常工作")
End If
[此贴子已经被作者于2017/11/8 14:47:34编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
webccc
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：20 积分：256 威望：0 精华：0 注册：2015/4/7 13:05:00 		  发帖心情 Post By：2017/11/8 14:52:00 [只看该作者]

感谢有点甜老师！
重新打开项目后没有代码提示错误了，然后自动跳转到主表“日常工作”，但是没有messagebox.show的提示语“有事项提醒！”跳出来，也没有自动筛选出符合要求的行，请问是怎么回事啊？
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2017/11/8 14:55:00 [只看该作者]

看3楼代码，控制好你的条件。

 回到顶部
帅哥哟，离线，有人找我吗？
webccc
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：20 积分：256 威望：0 精华：0 注册：2015/4/7 13:05:00 		  发帖心情 Post By：2017/11/8 15:03:00 [只看该作者]

谢谢有点甜老师了！

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 4 次数据查询