共19 条记录, 每页显示 10 条, 页签: [1] [2]

标题：有没有更好的办法来对临时表的某一列内容进行更新?

1楼

reachtone 发表于：2009/9/12 10:56:00

我现在想对生成的统计表的金额列转换为万元，翻遍了所有的帮助，好象只能通过行循环的方法，对每一行的金额列分别赋值。我很担心，如果统计结果的记录数很多的话，这种更新方式的效率是不是太低了？难道不能用一条命令对这一列进行整体转换吗？
datatable有replacefor方法，但它只能替换为指定值，不能用表达式；DataCol可以用Expression设置计算表达式，但它仅对表达式列或临时列有效。
请问，还有没有更好的办法来实现某一列内容的更新？

[此贴子已经被作者于2009-9-12 10:56:44编辑过]

2楼

HLJ 发表于：2009/9/12 11:46:00

试试Eval,不知效率如何(相当易表的EvalFor?)

Dim exp As String = "[数量] * [单价] * 0.8"
Dim drs As List(of DataRow) = DataTables("订单").Select("数量 > 500")
For Each dr As DataRow In drs
dr("金额") = Eval(exp,dr)
Next

3楼

yangming 发表于：2009/9/12 12:11:00

实在不行,增加一临时列,用Expression设置计算表达式

4楼

reachtone 发表于：2009/9/12 12:24:00

Eval实际上也是按行更新的，这跟我现在用的行循环更新实际上是一个意思。
曾经尝试用sqlcommand的ExecuteNonQuery，因为这里可以使用sql语句。试了以后也不行，说是找不到指定表。
实在不行的话，只能按杨版的意思，增加一个临时列了。
只是没有想到，很常用的列更新，怎么会这么不便呢？Expression干嘛要分什么临时列或表达式列？如果一定要这么分的话，可不可以象RaiseDataColChanged能强制刷新某列一样，也来个RaiseExpression呢？
请老六考虑改进一下！

[此贴子已经被作者于2009-9-12 12:31:39编辑过]

5楼

HLJ 发表于：2009/9/12 12:31:00

支持有个象易表的EvalFor的方法!

6楼

czy 发表于：2009/9/12 12:37:00

如果能增加一个这样的列属性就很方便了

7楼

czy 发表于：2009/9/12 12:39:00

以下是引用reachtone在2009-9-12 12:24:00的发言：
Eval实际上也是按行更新的，这跟我现在用的行循环更新实际上是一个意思。
曾经尝试用sqlcommand的ExecuteNonQuery，因为这里可以使用sql语句。试了以后也不行，说是找不到指定表。
实在不行的话，只能按杨版的意思，增加一个临时列了。
只是没有想到，很常用的列更新，怎么会这么不便呢？请老六考虑改进一下！

还是增加一个表达式列好，循环计算速度远没有表达式计算来的快

8楼

HLJ 发表于：2009/9/12 12:40:00

其实也可以用Select重新生成,反正SQL高效嘛.

9楼

reachtone 发表于：2009/9/12 13:25:00

以下是引用HLJ在2009-9-12 12:40:00的发言：
其实也可以用Select重新生成,反正SQL高效嘛.

统计表是用GroupTableBuild等生成的临时内部表，没办法使用sqlcommand，总是提示表名错误。如：
update ｛tjb｝ set 费用 = Round(费用/10000,2)
这个sql语句再简单不过了，但一执行就出错。tjb是生成的统计表名称。

[此贴子已经被作者于2009-9-12 13:26:23编辑过]

10楼

HLJ 发表于：2009/9/12 14:59:00

以下是引用reachtone在2009-9-12 13:25:00的发言：

统计表是用GroupTableBuild等生成的临时内部表

为何不用SQLGroupTableBuilder?

示例二

假定金额列是一个表达式列，根据数量、单价、计算得出金额。
现在要统计每个产品的销售数量和金额，直接统计后台数据，由于GroupTableBuilder是不能统计表达式列，也不能自定义统计表达式，对于此类统计是无能为力的。
如果用SQLGroupTableBuilder则很简单：

Dim b As New SQLGroupTableBuilder("统计表1","订单")
b.Groups.AddDef("产品")
b.Totals.AddDef("数量")
b.Exprs.Adddef("金额","[数量] * [单价] * (1 - [折扣])")
b.Build

共19 条记录, 每页显示 10 条, 页签: [1] [2]