以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  外部数据源后台数据统计  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=23005)

--  作者:erdbeer
--  发布时间:2012/8/29 23:29:00
--  外部数据源后台数据统计

用的是外部数据源,access的

 

想要有个按钮,能计算出:

 

在窗口的控件中输入日期后,想要统计,表A中  B列的数据总和(B列是单整型的表达式列),加总的条件是C列日期小于等于输入的日期

 

请教高手,这样的代码怎么写啊?


--  作者:狐狸爸爸
--  发布时间:2012/8/30 8:26:00
--  
Dim cmd As New SQLCommand
cmd.Connection Name = "数据源名称"
cmd.CommandText ="Select sum("数量") As 总和 Where 日期 < #"  & 你输入的日期 & "#"
Dim Val As Double = cmd.ExecuteScalar
--  作者:erdbeer
--  发布时间:2012/9/3 13:45:00
--  

Dim i As Date =e.Form.Controls("DateTimePicker1").Value
Dim cmd As New SQLCommand
cmd.C
cmd.CommandText ="Select sum("余额") As 余额 From{定单明细} Where 付款日期 <= # "& i & "#"
Dim Val As Double = cmd.ExecuteScalar 

 

按钮的代码我用上面这段,提示以下错误信息提示


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


--  作者:狐狸爸爸
--  发布时间:2012/9/3 16:03:00
--  
Dim cmd As New SQLCommand
cmd.Connection Name = "数据源名称"
cmd.CommandText ="Select sum(数量) As 总和 Where 日期 < #" & 你输入的日期 & "#"
Dim Val As Double = cmd.ExecuteScalar