Select Case e.DataCol.Name
Case "仓店编号"
Dim dr As DataRow
dr = DataTables("客户发退货汇总表").SQLFind("[仓店编号] = '" & e.DataRow("仓店编号") & "'", "年份,月份 Desc")
If dr IsNot Nothing Then
e.DataRow("仓店名称") = dr("仓店名称")
end if
End Select
上面会出错,原因是在BeforeLoadOuterTable对客户发退货汇总表设置了初始不加载表,SQLFind不能直接对后台数据库的表进行查找吗
[此贴子已经被作者于2025/2/28 16:06:55编辑过]
没有加载的表,不存在DataTables("客户发退货汇总表")这种用法。只能使用SQLcommand查询数据
在
MainTableChanged事件中设置加载表进来If MainTable.Name = "客户仓店档案" Then
DataTables.Load("客户发退货汇总表_订铺货")
End If
但在打开客户仓店档案时会自动跳出下面这个提示,有什么办法不提示吗
此主题相关图片如下:微信图片_20250308170017.png
