[讨论]关于发布后项目很久后报错 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

老师好：

请帮看下附件描述是什么原因导致，已经使用很长时间才报错，并且根据帮助查到报错问题代码，但是看代码又发现不了问题...

下载信息 [文件大小：下载次数： ]
点击浏览该文件:关于报错.rar

谢谢！

是不是年月列数据里有特殊字符？导出{上线记录}表数据测试一下

谢谢老师，现在没有发现特殊字符（又重新从报工表里复制年月列名到上线表里年月列重命名粘贴的）。bin文件夹也删了多次测试

此主题相关图片如下：表列名对比.png

[此贴子已经被作者于2020/3/13 17:45:58编辑过]

指的是年月列这一列存储的数据，不是列名有特殊字符。最好导出{上线记录}表数据测试一下

谢谢老师，现在又发现目录树节点展开过滤也是错的了......

年月数据值是根据日时间生成的，

If e.DataCol.Name = "日" Then

If e.DataRow.IsNull("日") Then

e.DataRow("年月") = Nothing

Else

Dim calCommon As New System.Globalization.GregorianCalendar()

Dim dt As Date = e.DataRow("日")

e.DataRow("年月") = Format(dt,"yyyy-MM")

End If

下载信息 [文件大小：下载次数： ]
点击浏览该文件:导出及目录树.rar

谢谢！

[此贴子已经被作者于2020/3/15 10:44:16编辑过]

1、我测试没有问题，请做个有问题的实例测试

下载信息 [文件大小：下载次数： ]
点击浏览该文件:管理项目12.zip

2、

Select Case e.Node.Level

Case 0

SQLFilter ="[年度] = '" & dr("年度") & "'"

Case 1

SQLFilter ="[年度] = '" & dr("年度") & "' And [生产车间] = '" & dr("生产车间") & "'"

Case 2

SQLFilter ="[年度] = '" & dr("年度") & "' And [生产车间] = '" & dr("生产车间") & "' And [班组] = '" & dr("班组") & "'"

Case 3

SQLFilter ="[年度] = '" & dr("年度") & "' And [生产车间] = '" & dr("生产车间") & "' And [班组] = '" & dr("班组") & "' and [组段] = '" & dr("组段") & "'"

Case 4

SQLFilter ="[年度] = '" & dr("年度") & "' And [生产车间] = '" & dr("生产车间") & "' And [班组] = '" & dr("班组") & "' and [组段] = '" & dr("组段") & "' and [年月] = '" & dr("年月") & "'"

Case 5

SQLFilter ="[年度] = '" & dr("年度") & "' And [生产车间] = '" & dr("生产车间") & "' And [班组] = '" & dr("班组") & "' and [组段] = '" & dr("组段") & "' and [年月] = '" & dr("年月") & "' and [日] = '" & dr("日") & "'"

End Select

主题：[讨论]关于发布后项目很久后报错