[求助]动态合成表达式 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]动态合成表达式

共有1510人关注过本帖树形打印复制链接主题：[求助]动态合成表达式

铜豆

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：78 积分：589 威望：0 精华：0 注册：2016/12/15 18:05:00

[求助]动态合成表达式 发帖心情

Post By：2016/12/18 20:08:00 [只看该作者]

If e.DataCol.Name = "搜索引擎" Then

e.DataRow("后台_展现") = DataTables("百度搜索引擎").Compute("Sum(展现)", "[日期] = #" & e.NewValue & "#")

e.DataRow("后台_点击") = DataTables("百度搜索引擎").Compute("Sum(点击)", "[日期] = #" & e.NewValue & "#")

End If

错误提示

错误所在事件：表，搜索引擎， DataColChanged

详细错误信息：

调用的目标发生了异常。

该字符串未被识别为有效的 DateTime。有一个从索引 0 处开始的未知字。

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：105965 积分：538900 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2016/12/19 8:50:00 [只看该作者]

"搜索引擎"是日期列吗，e.NewValue是"搜索引擎"的值，是否应该这样

If e.DataCol.Name = "某日期列" Then

e.DataRow("后台_展现") = DataTables("百度搜索引擎").Compute("Sum(展现)", "[日期] = #" & e.NewValue & "#")

e.DataRow("后台_点击") = DataTables("百度搜索引擎").Compute("Sum(点击)", "[日期] = #" & e.NewValue & "#")

End If

或

If e.DataCol.Name = "搜索引擎" Then

e.DataRow("后台_展现") = DataTables("百度搜索引擎").Compute("Sum(展现)", "[日期] = #" & e.DataRow("某日期列") & "#")

e.DataRow("后台_点击") = DataTables("百度搜索引擎").Compute("Sum(点击)", "[日期] = #" & e.DataRow("某日期列") & "#")

End If

或

If e.DataCol.Name = "搜索引擎" Then

e.DataRow("后台_展现") = DataTables("百度搜索引擎").Compute("Sum(展现)", "[搜索引擎] = '" & e.NewValue & "'")

e.DataRow("后台_点击") = DataTables("百度搜索引擎").Compute("Sum(点击)", "[搜索引擎] = '" & e.NewValue & "'")

End If

[此贴子已经被作者于2016/12/19 8:50:06编辑过]

铜豆

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：78 积分：589 威望：0 精华：0 注册：2016/12/15 18:05:00

Post By：2016/12/19 9:59:00 [只看该作者]

老师搜索引擎是字符列，日期才是日期列，我要同时满足日期和搜索引擎时就就行统计，上述只满足一个条件

If e.DataCol.Name = "搜索引擎" Then

e.DataRow("后台_展现") = DataTables("百度搜索引擎").Compute("Sum(展现)", "[日期] = #" & e.NewValue & "# And "[搜索引擎] = '" e.NewValue &"' ")

e.DataRow("后台_点击") = DataTables("百度搜索引擎").Compute("Sum(点击)", "[日期] = #" & e.NewValue & "# And "[搜索引擎] = '" e.NewValue &"' ")

End If

以上是我写的，但是无法执行

有点色

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2016/12/19 10:26:00 [只看该作者]

If e.DataCol.Name = "搜索引擎" Then

e.DataRow("后台_展现") = DataTables("百度搜索引擎").Compute("Sum(展现)", "[日期] = #" & e.DataRow("日期") & "# And "[搜索引擎] = '" e.DataRow("某日期列") &"' ")

e.DataRow("后台_点击") = DataTables("百度搜索引擎").Compute("Sum(点击)", "[日期] = #" & e.DataRow("日期") & "# And "[搜索引擎] = '" e.DataRow("搜索引擎") &"' ")

End If

铜豆

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：78 积分：589 威望：0 精华：0 注册：2016/12/15 18:05:00

Post By：2016/12/19 12:36:00 [只看该作者]

Compute("Sum(展现)", "[日期] = #" & e.NewValue & "# And "[搜索引擎] = '" e.NewValue &"' ")=Compute("Sum(展现)", "[日期] = #" & e.DataRow("日期") & "# And "[搜索引擎] = '" e.DataRow("某日期列") &"' ")

Compute("Sum(点击)", "[日期] = #" & e.NewValue & "# And "[搜索引擎] = '" e.NewValue &"' ")=Compute("Sum(点击)", "[日期] = #" & e.DataRow("日期") & "# And "[搜索引擎] = '" e.DataRow("搜索引擎") &"' ")

老师两者之间表达式不是等效吗？为什么图片点击可在新窗口打开查看

换成你这样才能用？难两者有什么条件限制吗？不同的情况用不同的代码

有点色

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2016/12/19 14:22:00 [只看该作者]

e.newvalue的值，是你修改单元格后，得到的值。

比如，你修改了搜索引擎列，那么e.newvalue就是你修改后的值，它，不是日期列的值。

下一主题 >> << 上一主题

主题：[求助]动态合成表达式