以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  日期筛选  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=92590)
--  作者：hsg1200
--  发布时间：2016/11/7 20:40:00
--  日期筛选
我想在购水明细表中的日期列设个连续三个月没购水就显示红色，在三个月内购了水就还原的代码改怎么写？
--  作者：有点蓝
--  发布时间：2016/11/7 20:47:00
--  
参考：http://www.foxtable.com/webhelp/scr/0656.htm
--  作者：有点蓝
--  发布时间：2016/11/7 21:03:00
--  
类似

Select Case e.Col.Name
    Case "纪念日"
        If e.Table.DataTable.Find("编号=\'" e.Row("编号") "\' and 日期 > \'" & Date.Today.AddMonths(-3) & "\'") Is Nothing Then
            e.Style = "样式1"
        End If
End Select
--  作者：hsg1200
--  发布时间：2016/11/9 12:07:00
--  
请问是不是在表事件的drowcall 里运行，怎么输入代码不行？
--  作者：有点色
--  发布时间：2016/11/9 13:00:00
--  
以下是引用hsg1200在2016/11/9 12:07:00的发言：
请问是不是在表事件的drowcall 里运行，怎么输入代码不行？

 

报什么错？

 

http://www.foxtable.com/webhelp/scr/0656.htm

 
--  作者：hsg1200
--  发布时间：2016/11/9 20:36:00
--  
图片点击可在新窗口打开查看
--  作者：hsg1200
--  发布时间：2016/11/9 20:43:00
--  

类型“datarow”的值无法转换为“boolean”

错误代码：If e.Table.DataTable.Find("编号=\'" e.Row("编号") "\' and 日期 > \'" & Date.Today.AddMonths(-3) & "\'") Is Nothing Then
--  作者：有点蓝
--  发布时间：2016/11/9 20:49:00
--  
If e.Table.DataTable.Find("编号=\'" & e.Row("编号") & "\' and 日期 > \'" & Date.Today.AddMonths(-3) & "\'") Is Nothing Then
--  作者：wyz20130512
--  发布时间：2016/11/9 20:50:00
--  
If e.Table.DataTable.Find(" 编号 = \'" & e.Row("编号") & "\' And 日期 > \'" & Date.Today.AddMonths(-3) & "\'") Is Nothing Then
--  作者：hsg1200
--  发布时间：2016/11/9 21:21:00
--  
谢谢！已解决，问题也找到了差了&