以文本方式查看主题

-  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=108085)

--  作者:地瓜
--  发布时间:2017/10/16 9:34:00
--  目录树提示错误
在“增加调整采购计划”表中,点击“筛选”链接会弹出“筛选增加调整采购计划”窗体,点击该窗体的节点时会弹出如图的错误,究竟是那方面出问题了,谢谢!

图片点击可在新窗口打开查看此主题相关图片如下:tim图片20171016092903.png
图片点击可在新窗口打开查看
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:综合办公管理平台.rar



--  作者:有点甜
--  发布时间:2017/10/16 9:36:00
--  
 afterOpenProject事件,写代码

 

Dim cd As System.Globalization.DateTimeFormatInfo = System.Globalization.DateTimeFormatInfo.CurrentInfo
cd.ShortDatePattern = "yyyy年MM月dd日"
Dim DateInfo As System.Reflection.FieldInfo = cd.Gettype.GetField("generalLongTimePattern", System.Reflection.BindingFlags.NonPublic Or System.Reflection.BindingFlags.Instance)
If  DateInfo IsNot Nothing Then
    DateInfo.SetValue(cd, "yyyy-MM-dd HH:mm:ss")
End If


--  作者:地瓜
--  发布时间:2017/10/16 10:02:00
--  
还是会出现截图的提示,谢谢!
--  作者:有点甜
--  发布时间:2017/10/16 10:15:00
--  

函数【调整计划筛选目录树NodeMouseDoubleClick事件】

 

Filter = "rq >= #" & d1 & "And rq <= #" & d2 & "#"

 

改成

 

Filter = "rq >= #" & d1 & "# And rq <= #" & d2 & "#"

 

全部相同的内容,都要改。