以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  错哪里了啊  (http://foxtable.net/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) & "#"