Foxtable(狐表)用户栏目专家坐堂 → [求助]请老师看下S elect 语句中错在哪?


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

主题:[求助]请老师看下S elect 语句中错在哪?

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


加好友 发短信
等级:五尾狐 帖子:1104 积分:8956 威望:0 精华:0 注册:2014/10/25 11:24:00
[求助]请老师看下S elect 语句中错在哪?  发帖心情 Post By:2018/2/12 18:00:00 [只看该作者]

关键字 'As' 附近有语法错误。
关键字 'is' 附近有语法错误。

下面是老师之前帮我写的代码,已经用了之前老师教我的用视图的方法,在例子中的内部表上执行一切正常,在项目上运行后报错,代码实在看不懂,请老师帮我看下。

Dim rq As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker1")
Dim t As Table = Tables(e.Form.Name & "_Table1")
Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.C
cmd.Commandtext = "S elect 公司,应付金额,iif(收款金额 is null,0,收款金额) As 收款金额,应付金额-iif(收款金额 is null,0,收款金额) As 应收款,iif([1-30天] is null,0, [1-30天]) As [1-30天],iif([31-60天] is null,0, [31-60天]) As [31-60天],iif([61-90天] Is null,0, [61-90天]) As [61-90天],iif([91-180天] Is null,0, [91-180天]) As [91-180天],iif([181-360天] Is null,0, [181-360天]) As [181-360天],iif([360天以上] Is null,0, [360天以上]) As [360天以上] from (S elect 公司,SUM(应付金额) As 应付金额,(S elect  sum(收款金额) from {收款录入} b where a.公司 = b.公司 ) As 收款金额,(S elect  sum(应付金额) from {vw登账应付明细} d where d.公司 = a.公司 And 应付日期 >= '" & rq.Value.AddDays(-30) & "' And 应付日期 <= '" & rq.Value.AddDays(-1) & "'  ) As [1-30天],(S elect  sum(应付金额) from {vw登账应付明细} d where d.公司 = a.公司 And 应付日期 >= '" & rq.Value.AddDays(-60) & "' And 应付日期 <= '" & rq.Value.AddDays(-31) & "'  ) As [31-60天],(S elect  sum(应付金额) from {vw登账应付明细} d where d.公司 = a.公司 And 应付日期 >= '" & rq.Value.AddDays(-90) & "' And 应付日期 <= '" & rq.Value.AddDays(-61) & "'  ) As [61-90天],(S elect  sum(应付金额) from {vw登账应付明细} d where d.公司 = a.公司 And 应付日期 >= '" & rq.Value.AddDays(-180) & "' And 应付日期 <= '" & rq.Value.AddDays(-91) & "'  ) As [91-180天],(S elect  sum(应付金额) from {vw登账应付明细} d where d.公司 = a.公司 And 应付日期 >= '" & rq.Value.AddDays(-360) & "' And 应付日期 <= '" & rq.Value.AddDays(-181) & "'  ) As [181-360天],(S elect  sum(应付金额) from {vw登账应付明细} d where d.公司 = a.公司 And 应付日期 < '" & rq.Value.AddDays(-360) & "'  ) As [360天以上] from {vw登账应付明细} As a group by 公司) As c where 应付金额-iif(收款金额 is null,0,收款金额) > 0"
dt = cmd.ExecuteReader()
t.DataSource = dt
[此贴子已经被作者于2018/2/12 18:02:26编辑过]

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


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

没有例子sql语句无法测试。你把sql语句简化,一句一句删除,测试看哪句有问题。


 回到顶部