update更新数据告知条数和失败数都可以统计出来，但是成功数永远是0，求解！ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

upd ate更新数据告知条数和失败数都可以统计出来，但是成功数永远是0，求解！

利用select查询数据成功数有数据的

Dim vals As List(Of String)

vals=DataTables("信息列表").s qlGetValues("信息编号","操作单位='" & _usergroup & "' ")

For Each val As String In vals

output.Show(val)

output.Show("信息编号='" & val & "'" )

Dim cmd As new SQ LCommand

cmd.Conn ecti

cmd.CommandText = "UPD ATE 信息列表 SE T 告知条数 = ? ,成功数 = ? ,失败数 = ? WHERE 信息编号='" & val & "'"

cmd.Parameters.Add("@告知条数",DataTables("告知内容").Co mpute("Count(姓名)","信息编号='" & val & "' "))

cmd.Parameters.Add("@成功数",DataTables("告知内容").Co mpute("Count(是否告知)","信息编号='" & val & "' And 是否告知='是' and 状态码='0'"))

cmd.Parameters.Add("@失败数",DataTables("告知内容").Co mpute("Count(是否告知)","信息编号='" & val & "' And 是否告知='否'"))

'cmd.Parameters.Add("@信息编号","信息编号='" & val & "'")

cmd.ExecuteNonQuery

output.Show(DataTables("告知内容").Co mpute("Count(姓名)","信息编号='" & val & "' "))

output.Show(DataTables("告知内容").Co mpute("Count(是否告知)","信息编号='" & val & "' And 是否告知='是' and 状态码='0'"))

output.Show(DataTables("告知内容").Co mpute("Count(是否告知)","信息编号='" & val & "' And 是否告知='否'"))

此主题相关图片如下：1.png

此主题相关图片如下：2.png

【红色部分怎么采用下面的sel ect语句优化呢？

Dim cmd1 As new SQ L Command

cmd1.Conn ectio nName = "综合本地数据"

cmd1.Com mandText = "se lect co unt (*) fr om {告知内容} where 信息编号='" & val & "' And 是否告知='是' and 状态码='0'"

】

[此贴子已经被作者于2020/4/13 11:33:03编辑过]

主题：update更新数据 告知条数和失败数都可以统计出来，但是成功数永远是0，求解！