以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]加载出错  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=171405)

--  作者:liuyixin662
--  发布时间:2021/8/28 17:23:00
--  [求助]加载出错

老师你好,加载出错,麻烦看一下是什么原因

 

Dim dr As DataRow = e.Node.DataRow \'获取生成此节点的行

Dim Filter As String

Dim Year As Integer = dr("年")

Dim Month As Integer = dr("月")

Dim Product As String = dr("客户名称")

Dim Product1 As String = dr("入库单号")

Dim st As String = dr("审核人")

 

Select Case e.Node.Level

    Case 0

        Filter ="Year(录入日期) = " & Year  And  st=""

    Case 1

        Filter ="Year(录入日期) = " & Year & " And Month(录入日期) = " & Month  And  st=""

End Select

DataTables("来料加工入库主表").LoadFilter = Filter

DataTables("来料加工入库主表").Load()


图片点击可在新窗口打开查看此主题相关图片如下:出错.png
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2021/8/28 17:30:00
--  

Select Case e.Node.Level

    Case 0

        Filter ="Year(录入日期) = " & Year & "  And  st=""

    Case 1

        Filter ="Year(录入日期) = " & Year & " And Month(录入日期) = " & Month & "  And  st=""

End Select


--  作者:liuyixin662
--  发布时间:2021/8/28 18:38:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:出错1.png
图片点击可在新窗口打开查看

--  作者:liuyixin662
--  发布时间:2021/8/28 19:01:00
--  

老师你好,还是出错


--  作者:有点蓝
--  发布时间:2021/8/29 20:02:00
--  
st这里想做什么判断?