Foxtable(狐表)用户栏目专家坐堂 → 统计的合计值怎么写入另外一个表


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

主题:统计的合计值怎么写入另外一个表

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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2015/3/25 15:28:00 [显示全部帖子]

此外,你要掌握表达式的基本语法:

http://www.foxtable.com/help/topics/0102.htm

http://www.foxtable.com/help/topics/1647.htm

 

还要知道合成表达式:

http://www.foxtable.com/help/topics/1284.htm

 

 

Dim Total As Long
Total = 
DataTables("订单").Compute("Sum(数量)""产品 = 'PD01' And 日期 >= #1/1/2015# And 日期 <= #1/31/2015#"
)
Output.Show(Total)


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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2015/3/25 15:30:00 [显示全部帖子]

Dim y As Integer = Date.Today.Year
Dim m As Integer = Date.Today.Month
Dim dt1 As New Date(y, m, 1)
Dim dt2 As New Date(y, m, Date.DaysInMonth(y, m)) '获取本月的最后一天
Dim Filter As String
Filter = "产品 = 'PD01' And 日期 >= #" & dt1 & "# And 日期 <= #" & dt2 & "#"
Dim Total As Long
Total = DataTables("订单").Compute("Sum(数量)", Filter)

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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2015/3/25 15:43:00 [显示全部帖子]

呵呵,学好5楼和6楼的帮助,你会发现这很简单,我们一点不厉害。

 

图片点击可在新窗口打开查看


 回到顶部