Foxtable(狐表) → 用户栏目 → 专家坐堂 → 后台统计年度到款，放到label控件


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

主题：后台统计年度到款，放到label控件
帅哥哟，离线，有人找我吗？
hawkgo
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：236 积分：1881 威望：0 精华：0 注册：2013/11/7 14:40:00 		后台统计年度到款，放到label控件  发帖心情 Post By：2015/8/21 14:39:00 [只看该作者]

If user.isrole("销售工程师") Then
Dim Val As Integer
Val = DataTables("合同管理_fa piao到款列表").SQLCompute("Sum("到款金额")","[销售工程师] = '" & user.name & "'" And "[到款日期] =  '" & Date.Today.Year & "'")
e.Form.controls("Label2").Name = "本年度到款: '" & val &"'"

End If

没有可访问的sqlcompute 接受此数目的参数？
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/8/21 14:41:00 [只看该作者]

Val = DataTables("合同管理_fa piao到款列表").SQLCompute("Sum(到款金额)","[销售工程师] = '" & user.name & "' And [到款日期] =  '" & Date.Today.Year & "'")

 
 回到顶部
帅哥哟，离线，有人找我吗？
hawkgo
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：236 积分：1881 威望：0 精华：0 注册：2013/11/7 14:40:00 		  发帖心情 Post By：2015/8/21 15:18:00 [只看该作者]

If user.isrole("销售工程师") Then
    Dim Val As Integer
    Val = DataTables("合同管理_fa piao到款列表").SQLCompute("Sum(到款金额)","[销售工程师] = '" & user.name & "' And [到款日期] =  '" & Date.Today.Year & "'")
    e.Form.controls("Label2").text = "本年度到款:" & val & "."
    '
End If

这样可以了，但是怎么算出来结果val，是0呢？
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/8/21 15:19:00 [只看该作者]

0说明条件不对。到款日期是年，如2015？

 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/8/21 15:20:00 [只看该作者]

Val = DataTables("合同管理_fa piao到款列表").SQLCompute("Sum(到款金额)","[销售工程师] = '" & user.name & "' And year([到款日期]) =  '" & Date.Today.Year & "'")

 回到顶部
帅哥哟，离线，有人找我吗？
hawkgo
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：236 积分：1881 威望：0 精华：0 注册：2013/11/7 14:40:00 		  发帖心情 Post By：2015/8/21 15:21:00 [只看该作者]

是的，就是今年的到款。
然后在统计这个月的到款
今天的到款。

我的合成表达式实在是渣，时灵时不灵。
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/8/21 15:41:00 [只看该作者]

日期的表达式，参考

 

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

 
 回到顶部
帅哥哟，离线，有人找我吗？
hawkgo
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：236 积分：1881 威望：0 精华：0 注册：2013/11/7 14:40:00 		  发帖心情 Post By：2015/8/21 16:47:00 [只看该作者]

Val1 = DataTables("合同管理_fa piao到款列表").SQLCompute("Sum(到款金额)","[销售工程师] = '" & user.name & "' And Month([到款日期]) =  '" & Date.Today.Month & "'")
    Val2 = DataTables("合同管理_fa piao到款列表").SQLCompute("Sum(到款金额)","[销售工程师] = '" & user.name & "' And Day([到款日期]) =  '" & Date.Today.Day & "'")
    

这两个统计出来的是，数据库所有年份当月的到款，8月21号的到款。
囧。
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/8/21 16:49:00 [只看该作者]

Val1 = DataTables("合同管理_fa piao到款列表").SQLCompute("Sum(到款金额)","[销售工程师] = '" & user.name & "' And Year([到款日期]) = '" & Date.Today.Year & "' and Month([到款日期]) =  '" & Date.Today.Month & "'")

 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/8/21 16:50:00 [只看该作者]

Val1 = DataTables("合同管理_fa piao到款列表").SQLCompute("Sum(到款金额)","[销售工程师] = '" & user.name & "' And Year([到款日期]) = '" & Date.Today.Year & "' and Month([到款日期]) =  '" & Date.Today.Month & "' And day([到款日期]) = '" & Date.Today.day & "' ")

 回到顶部
总数 11 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04883 秒, 4 次数据查询