Foxtable(狐表)用户栏目专家坐堂 → [讨论]在“统计演示”项目中,这段代码错在哪里啊?


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

主题:[讨论]在“统计演示”项目中,这段代码错在哪里啊?

帅哥哟,离线,有人找我吗?
wcs
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1038 积分:7439 威望:0 精华:0 注册:2008/8/31 22:52:00
[讨论]在“统计演示”项目中,这段代码错在哪里啊?  发帖心情 Post By:2008/9/20 18:01:00 [只看该作者]

 

Dim dt As DataTable = DataTables("产品")
For Each
dr As DataRow In dt.DataRows
    If
dr("品名") = "电视机" OrElse dr("品名") = "电饭煲" Then
        For Each
sr As DataRow In dr.GetChildrows("订单")
            output.show(sr("客户"))

        Next
    End If
Next

我想显示订单表中 品名=电视机 或 电饭煲 的客户清单。

可是执行出错。


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


加好友 发短信
等级:一尾狐 帖子:445 积分:3025 威望:0 精华:0 注册:2008/9/13 10:49:00
  发帖心情 Post By:2008/9/20 18:56:00 [只看该作者]

或者请检查
1,订单这个表是不是做子表
2,在订单这个表有没有客户这列

试过楼主的代码,在我这里可以通过。

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


加好友 发短信
等级:一尾狐 帖子:445 积分:3025 威望:0 精华:0 注册:2008/9/13 10:49:00
  发帖心情 Post By:2008/9/20 19:00:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:未命名.jpg
图片点击可在新窗口打开查看

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


加好友 发短信 一级勋章 三级勋章 二级勋章
等级:超级版主 帖子:6318 积分:33957 威望:0 精华:10 注册:2008/8/31 20:56:00
  发帖心情 Post By:2008/9/20 19:40:00 [只看该作者]

以下是引用wcs在2008-9-20 18:01:00的发言:
 

Dim dt As DataTable = DataTables("产品")
For Each
dr As DataRow In dt.DataRows
    If
dr("品名") = "电视机" OrElse dr("品名") = "电饭煲" Then
        For Each
sr As DataRow In dr.GetChildrows("订单")
            output.show(sr("客户"))

        Next
    End If
Next

我想显示订单表中 品名=电视机 或 电饭煲 的客户清单。

可是执行出错。


在统计演示项目中执行这段代码是肯定出错的,因为这个项目中既没有产品表,也没有品名列。
执行之前你应改一下代码,或改一下项目中的列名称。


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


加好友 发短信
等级:五尾狐 帖子:1038 积分:7439 威望:0 精华:0 注册:2008/8/31 22:52:00
  发帖心情 Post By:2008/9/20 19:45:00 [只看该作者]

明白了,我试的是“统计演示”项目。里面没有产品表,哈哈,OK了。

我很不习惯对象、属性、方法、类型这些东西。还有用“.”串成的一串一串的代码,一层套一层的关系,这与易表太不一样了!

可我还是试着认真理解帮助里的代码规则,修改帮助文件中的代码,看有什么不同的结果,以加强理解。

看了我已掌握了一些东西,好啊!

 回到顶部