以文本方式查看主题

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

--  作者:紫色幽魂
--  发布时间:2019/5/5 9:13:00
--  [求助]动态加载完数据后提示出错
在CurrentChanged事件中设置了条件加载命令,出现下面这个错误,是在数据加载完后提示的,本来打算用LoadChildren,但是提示我必须要同一个数据源才能加载,实际只有一个外部数据源,父表和子表都是一个数据源的,所以换成不同行加载不同数据


Dim h As String  = e.Table.Current("单项工程编号")
DataTables("无损_检验批_现场").LoadFilter = "单项工程编号 = "& h &""
DataTables("无损_检验批_现场").Load()



.NET Framework 版本:2.0.50727.8940
Foxtable 版本:2019.4.12.1
错误所在事件:无损_单项工程,CurrentChanged
详细错误信息:
未将对象引用设置到对象的实例。


--  作者:有点甜
--  发布时间:2019/5/5 9:18:00
--  

改成

 

DataTables("无损_检验批_现场").LoadFilter = "单项工程编号 = \'" & h & "\'"


--  作者:紫色幽魂
--  发布时间:2019/5/5 14:16:00
--  回复:(有点甜)改成 DataTables("无损_检验...
还是一样的
--  作者:有点甜
--  发布时间:2019/5/5 14:29:00
--  
If e.Table.current IsNot Nothing Then
    Dim h As String  = e.Table.Current("单项工程编号")
    DataTables("无损_检验批_现场").LoadFilter = "单项工程编号 = \'" & h & "\'"
    DataTables("无损_检验批_现场").Load()
End If

--  作者:紫色幽魂
--  发布时间:2019/5/5 15:05:00
--  回复:(有点甜)If e.Table.current IsNot Nothing T...
谢谢,解决了,选择的行都不是空行,和条件表达的意思都是一样的,为什么会出现这种情况
--  作者:有点甜
--  发布时间:2019/5/5 15:11:00
--  
以下是引用紫色幽魂在2019/5/5 15:05:00的发言:
谢谢,解决了,选择的行都不是空行,和条件表达的意思都是一样的,为什么会出现这种情况

 

当表格没有数据行的时候,执行代码 e.table.current 会报错。

 


--  作者:紫色幽魂
--  发布时间:2019/5/5 16:36:00
--  回复:(有点甜)以下是引用紫色幽魂在2019/5/5 15:05...
但是表格中是有代码的,原来是点击行后会报错,关掉报错后数据是正常加载的
--  作者:有点甜
--  发布时间:2019/5/5 16:46:00
--  
以下是引用紫色幽魂在2019/5/5 16:36:00的发言:
但是表格中是有代码的,原来是点击行后会报错,关掉报错后数据是正常加载的

 

写了什么什么代码,报什么错?加入判断不行? If e.Table.current IsNot Nothing Then