以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  根据有效日期做到期提醒怎么做?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=140595)

--  作者:www10086
--  发布时间:2019/9/9 16:03:00
--  根据有效日期做到期提醒怎么做?
有一个产品表,其中有产品的生产日期,有效日期,我想根据有效日期列,到当前时间为30天的日期,做提醒。该怎么做?
--  作者:有点蓝
--  发布时间:2019/9/9 16:07:00
--  
参考:http://www.foxtable.com/webhelp/topics/2471.htm
--  作者:www10086
--  发布时间:2019/9/9 16:15:00
--  
If e.col.Name = "到期日期" Then
    If
 e.Row.IsNull("到期日期") = False
        If
 e.Row("到期日期") < Date.Today.AddDays(10Then
            e.Style = 
"到期"
        
End If
    End
 If
End
 If
你是说这个可以直接用是吗


--  作者:有点蓝
--  发布时间:2019/9/9 16:18:00
--  
逻辑一样,代码肯定不能完全照搬,根据实际表格改为自己的列名
--  作者:www10086
--  发布时间:2019/9/9 16:23:00
--  
谢谢,明白了?