主题：动态加载数据问题

表CurrentChanged事件代码：
if tables("产品目录").count > 0
    With DataTables("产品工序")
        .LoadFilter = "[图号] = '" & Tables("产品目录").Current("图号") & "'"
        .Load()
    End With
    With DataTables("产品工艺")
        .LoadFilter = "[图号] = '" & Tables("产品目录").Current("图号") & "'"
        .Load()
    End With
    Return
end if
在表行由0行到有行时，也会报错，加和删除红色代码都一样，图片如下：
此主题相关图片如下：未命名1.bmp

还是文本框加载问题，用目录树加没问题，用文本框加载，如没找到数据，在输入能找到的事件时，就出现以上提示。

为何不用Fill?看看我的项目。就是用Fill实现的动态加载。


此主题相关图片如下：0001.gif

不是填充数据，是从后台加载，表属性设置不加载数据的，要2种加载数据方式，一是从后台生成目录树，点击节点加载数据，一是文本框输入部分数据加载符合条件的行。后一个不能成功。
帖子和代码在http://www.datasoft.com.cn/fox/dispbbs.asp?boardid=2&id=5891&page=1&star=1  5楼

文本框里动态加载也一样，


此主题相关图片如下：01.gif


代码如下：

Dim txt As String = e.Form.Controls("TextBox1").Text
Tables("录入_Table1").Fill("Select * From [F收费项目] where 拼音码 Like '" & txt & "%' or 别名拼音码 Like '" & txt & "%'","Yasys",True）

我没有填充数据呀，也是从后台加载。表属性设置也是不加载的。

菜鸟foxtable : 这个fill 速度怎么样，我试的时候总感觉有点卡呀～  特别是在两个窗口table联动的的时候，很卡，不舒服呀～  

这个代码不适合楼主，他没有外部数据，全是内部表的， 而且窗口中的三个table是Normal型，都绑定到三个不同的关联表了。

我的项目是外部数据，只是做示范文件用内补数据，我不会用ass数据库，项目是sql的。
这时mr725，我改了以下，2个关联表我先不加载数据，动态加载，已经ok了，明天我再放到我的sql数据库的项目中试试看还有没有什么问题，再次感谢mr725，谢谢您

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:动态加载数据问题 myslf 管理项目19.table

Dim txb1 As String = e.Form.Controls("TextBox1").Text
Dim Filter As string =  "[图号] Like '%" & txb1 & "%'or [名称] Like '%" & txb1 & "%'"
DataTables("产品目录").LoadFilter = Filter
DataTables("产品目录").Load()