呵呵,既然sql语句是逐段拼接的,就一段一段分析,先:
Dim str1 As String
str1 = "Select 地区,Count(地区) As 终端机总数,Sum(IIf(状态 = '开机',1,0)) As 开机,Sum(IIf(状态 = '关机',1,0)) As 关机"
str1 = str1 & " From {设备管理} Group by 地区"
Dim cmd As New SQLCommand
cmd.Connection Name = ""
cmd.CommandText = str1
cmd.excuteReader
在命令窗口测试执行,看看有没有问题
然后:
Dim str1 As String
str1 = "Select 地区,Count(地区) As 终端机总数,Sum(IIf(状态 = '开机',1,0)) As 开机,Sum(IIf(状态 = '关机',1,0)) As 关机,"
str1 = str1 & "Sum(IIf(状态 = '仓库',1,0)) As 仓库, Sum(IIf(状态 = '中心',1,0)) As 1号中断,Sum(IIf(终端机_型号 = 'TPT',1,0)) As TPT"
str1 = str1 & " From {设备管理} Group by 地区"
Dim cmd As New SQLCommand
cmd.Connection Name = ""
cmd.CommandText = str1
cmd.excuteReader
在命令窗口继续测试执行,看看有没有问题。
看看问题出在哪一行,自己多主动分析,不能太依赖别人。
或者一开始就 output.show(cmd.CommandText), 获取合成的全部sql语句,复制大sql执行窗口执行分析。
[此贴子已经被作者于2013-7-30 16:54:35编辑过]