Foxtable(狐表)用户栏目专家坐堂 → 奇怪的程序假死问题


  共有6375人关注过本帖树形打印复制链接

主题:奇怪的程序假死问题

帅哥哟,离线,有人找我吗?
晕了快扶我
  31楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1195 积分:7040 威望:0 精华:0 注册:2013/3/4 18:02:00
  发帖心情 Post By:2013/8/5 10:14:00 [只看该作者]

以下是引用逛逛在2013-8-4 22:51:00的发言:

想问一下,你的子表里也包含了供应商信息吗?

一个供应商有几个联系人,我的查询包括可以查询联系人姓名的,在一个查询中完成


 回到顶部
帅哥哟,离线,有人找我吗?
晕了快扶我
  32楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1195 积分:7040 威望:0 精华:0 注册:2013/3/4 18:02:00
  发帖心情 Post By:2013/8/5 10:15:00 [只看该作者]

以下是引用blackzhu在2013-8-5 7:52:00的发言:
楼主的写法 不死循环才怪,17楼的是对的.具体看看这个:


AfterLoad

如果还没有接触动态数据加载,可以暂时忽略本事件。

在重新加载数据后执行。
不管是通过加载树加载数据,还是自己编写代码执行Load方法加载数据,都会执行此事件。

e参数属性:

DataTable:触发事件的DataTable

示例一

假定有两个表,分别是订单和订单明细,两者通过"订单ID"列关联起来,订单是父表,订单明细是子表,因为每个订单对应有若干订单明细。
由于数据量比较大,决定采用动态加载,每次只加载一定数量的订单进行处理,显然作为一个合格的系统,应该同时加载这些订单的订单明细。

要完成这样的任务很简单,只需在订单表的AfterLoad事件中加入以下代码即可:

Dim ids As String
For
Each dr As DataRow In DataTables("订单").DataRows
    ids = ids &
"," & dr("订单ID")
Next

ids= ids.Trim(
",")
DataTables
("订单明细").LoadFilter = "订单ID In (" & ids & ")"
DataTables
("订单明细").Load()

上述代码会自动扫描已加载订单的订单ID,并合成订单明细表的加载条件,最后重新加载订单明细表。
假定订单表加载了6个订单,其订单ID分别为1、2、6、7、8、9,显然上述代码为订单明细表合成的加载条件为:订单ID In (1,2,6,7,8,9),这样重新加载订单明细表时,将只加载这6个订单的订单明细。

可见代码的关键在于In运算符,在学习SQL语句的时候,我们会介绍此运算符。



  注意这个写法是 数值列的写法.

猪哥,我这是查询加载,不只是加载啊,如果不用loadfilter的方式筛选加载的话,就只有用SQL语句了...loadfilter如果不遍历ids的话,搞不定


 回到顶部
帅哥哟,离线,有人找我吗?
程兴刚
  33楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:7235 积分:40550 威望:0 精华:16 注册:2008/8/31 23:23:00
  发帖心情 Post By:2013/8/5 13:29:00 [只看该作者]

这样的写法:

 

Dim ids As String
For
Each dr As DataRow In DataTables("订单").DataRows
    ids = ids &
"," & dr("订单ID")
Next

ids= ids.Trim(
",")
DataTables
("订单明细").LoadFilter = "订单ID In (" & ids & ")"
DataTables
("订单明细").Load()

 

等效于:

 

DataTables("订单明细").LoadFilter = ""
DataTables
("订单明细").Load()

 

遍历所有行意义何在?

 


 回到顶部
总数 33 上一页 1 2 3 4