Foxtable(狐表)用户栏目专家坐堂 → sql语句


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

主题:sql语句

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


加好友 发短信
等级:七尾狐 帖子:1709 积分:15982 威望:0 精华:0 注册:2017/6/1 23:12:00
sql语句  发帖心情 Post By:2019/1/29 22:25:00 [只看该作者]

s elect (S elect  sum(收入金额)  from {收入}  where 日期>=#" & Date.Today.AddDays(-30) & "# and 日期<=#" & Date.Today &"#) As 收入,(S elect  sum(费用金额)  from {费用}  where 日期>=#" & Date.Today.AddDays(-30) & "# and 日期<=#" & Date.Today &"#) As 费用,收入-费用 as 利润
 
这样的SQL语句 ,怎么合成不报错?

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


加好友 发短信
等级:超级版主 帖子:107440 积分:546479 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/1/29 22:53:00 [只看该作者]


"Select 收入,费用,收入-费用 As 利润 from (Select  sum(收入金额)  from {收入}  where 日期>=#" & Date.Today.AddDays(-30) & "# and 日期<=#" & Date.Today & "#) As 收入,(S elect  sum(费用金额)  from {费用}  where 日期>=#" & Date.Today.AddDays(-30) & "# and 日期<=#" & Date.Today & "#) As 费用) as a"

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


加好友 发短信
等级:七尾狐 帖子:1709 积分:15982 威望:0 精华:0 注册:2017/6/1 23:12:00
  发帖心情 Post By:2019/1/30 16:04:00 [只看该作者]

"Select 收入,费用,收入-费用 As 利润 from ((Select  sum(收入金额)  from {收入}  where 日期>=#" & Date.Today.AddDays(-30) & "# and 日期<=#" & Date.Today & "#) As 收入,(S elect  sum(费用金额)  from {费用}  where 日期>=#" & Date.Today.AddDays(-30) & "# and 日期<=#" & Date.Today & "#) As 费用) as a"我这样写报错

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107440 积分:546479 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/1/30 17:35:00 [只看该作者]

照抄2楼,不要画蛇添足

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


加好友 发短信
等级:七尾狐 帖子:1709 积分:15982 威望:0 精华:0 注册:2017/6/1 23:12:00
  发帖心情 Post By:2019/1/30 17:48:00 [只看该作者]

按二楼的真的不行,提示未指定错误!感觉二楼缺个左括号,写上也不行

[此贴子已经被作者于2019/1/30 17:48:27编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/1/30 21:53:00 [只看该作者]

1、你直接设置还是写代码的?

 

2、2楼的是写代码的,你最后msgbox弹出合成的值看一下。在sql测试窗口测试,看报什么错。

 

3、做个例子发上来测试。


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


加好友 发短信
等级:七尾狐 帖子:1709 积分:15982 威望:0 精华:0 注册:2017/6/1 23:12:00
  发帖心情 Post By:2019/1/30 22:05:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目5.rar


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/1/30 22:44:00 [只看该作者]

Dim cmd As new sqlcommand
cmd.CommandText="select top 1 (Select  sum(收入金额)  from {收入}  where 日期>=#" & Date.Today.AddDays(-30) & "# and 日期<=#" & Date.Today & "#) As 收入,(Select  sum(费用金额)  from {费用}  where 日期>=#" & Date.Today.AddDays(-30) & "# and 日期<=#" & Date.Today &"#) As 费用," & _
"收入-费用 as 利润 from {收入}"
Tables("窗口1_table1").DataSource =cmd.ExecuteReader
Tables("窗口1_table1").AutoSizeCols

 回到顶部