以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]web数据源afterload加载load问题解决了么?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=122324)

--  作者:浙江仔
--  发布时间:2018/7/23 11:06:00
--  [求助]web数据源afterload加载load问题解决了么?
web数据源关联表afterload加载,经测试load导致程序退出

If e.DataTable.DataRows.Count > 0 Then
    Dim ids As String
    Dim idcards As String
    For Each dr As DataRow In DataTables("Person_info").DataRows
        ids = ids & "," & dr("bmID")
        idcards = idcards & "," & dr("papernum")
    Next
    ids= ids.Trim(",")
    idcards= idcards.Trim(",")

    e.DataTable.LoadChildren("Train_info","bmID","[bmID]")    ‘此代码可行

    DataTables("Train_info").LoadFilter = "bmID In (" & ids & ")"   \'此代码导致程序异常退出
    DataTables("Train_info").Load()                                           \'此代码导致程序异常退出

End If

但是我再另外一个程序,主表是直连数据库
用的是CurrentChanged代码加载web数据源,程序不报错
    DataTables("Person_info").LoadFilter = ("enterprise_id  =   \'"& e.Table.current("enterprise_id") &"\' ")
    DataTables("Person_info").Load()


--  作者:有点甜
--  发布时间:2018/7/23 11:14:00
--  

我测试了一下,代码没问题。请升级到最新版foxtable。

 

如果还有问题,做个实例发上来说明。


--  作者:liufucan
--  发布时间:2020/5/2 11:26:00
--  
最新版把access转成web数据源之后,
初次load没问题,加条件再次load的时候所有行号成了橙色

--  作者:有点蓝
--  发布时间:2020/5/5 14:00:00
--  
以下是引用liufucan在2020/5/2 11:26:00的发言:
最新版把access转成web数据源之后,
初次load没问题,加条件再次load的时候所有行号成了橙色

我测试没有问题。肯定是自己有其它代码影响了