针对表加载的条件,一直出现
')' 附近有语法错误。 “
的错误,但数据可以加载到,请问应该如何调整,谢谢!
Dim qg As String = "是否订购 = 0 And 取消请购 = 0 And 请购子单号 <> '"& r("请购子单号") &"'"
Dim cg As String = "订购日期 >= '2020/07/01'And 订购日期 <= '"& Date.Today.AddDays(-45) &"' And 入库日期 Is Null"
Dim fillter As String = "单位代码 = '"& r("单位代码") &"' And 物料编号 = '"& r("物料编号") &"' And (" & qg & " or " & cg & ")"
DataTables("1017请购提交查询_Table1").LoadFilter = fillter
DataTables("1017请购提交查询_Table1").Load