以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  错哪里了啊  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=77121)
--  作者：aidimeng
--  发布时间：2015/11/11 13:48:00
--  错哪里了啊

Dim d As Date = Date.Today

Tables("员工表").Filter ="[部门]=\'" & e.node.text & " \' and  [合同截止日期]<=d.AddDays(30)   "
     

--  作者：aidimeng
--  发布时间：2015/11/11 14:00:00
--  

 e.sender.selectnode.text   这里是没问题的

 

给的报错是

 


图片点击可在新窗口打开查看此主题相关图片如下：ccc.png
图片点击可在新窗口打开查看
--  作者：狐表开发
--  发布时间：2015/11/11 14:02:00
--  

Dim d As Date = Date.Today

Tables("员工表").Filter = "[部门] = \'" & e.node.text & "\' and  [合同截止日期] <= #" & d.AddDays(30) & "#"