以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  已知符合条件的行数 如何实现当前开始状态=true的行 和 结束状态=true的行 都等于符合条件总行的数据 然后去更新 对应条件行的会议状态为true  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=176828)

--  作者:cnsjroom
--  发布时间:2022/4/28 9:54:00
--  已知符合条件的行数 如何实现当前开始状态=true的行 和 结束状态=true的行 都等于符合条件总行的数据 然后去更新 对应条件行的会议状态为true

已知符合条件的行数 如何实现当前开始状态=true的行 和 结束状态=true的行 都等于符合条件总行的数据  然后去更新  对应条件行的会议状态为true

 

当前代码如下:初步实现预期,有没有更简洁的写法呢?谢谢!

vars("会议主题uuid")="0eb3c054-4314-4814-be47-99f6422651e6"

Dim cmd As New SQLCommand
cmd.Conn ectionN ame = "无纸化会议"
Dim dt,dt1 As DataTable
cmd.Comm andText = "SELE CT * Fr om 会议状态 where uuid=\'" & vars("会议主题uuid") & "\'"
dt = cmd.ExecuteReader()
Dim c1,c2,c3 As Integer
cmd.Comma ndText = "SELE CT Count(*) Fro m 会议议题 where uuid=\'" & vars("会议主题uuid") & "\'"   \'判断会议议题有多少符合数据的行\'
c1= cmd.ExecuteScalar
cmd.Comma ndText = "SEL ECT Count(*) Fro m 会议议题 where uuid=\'" & vars("会议主题uuid") & "\'and 开始状态=\'true\'" \'判断会议议题有多少符合开始状态为true数据的行\'
c2= cmd.ExecuteScalar
cmd.Comm andText = "SEL ECT Count(*) Fro m 会议议题 where uuid=\'" & vars("会议主题uuid") & "\'and 结束状态=\'true\'" \'判断会议议题有多少符合结束状态为true数据的行\'
c3= cmd.ExecuteScalar

output.show(c1)
output.show(c2)
output.show(c3)

If c2=c1 And c3=c1 Then   \'如果开始状态为true的行  结束状态为true的行  都等于总数据行的话\'
    cmd.Comma ndText = "U PDATE 会议状态 SET 会议状态 = \'true\' where uuid=\'" & vars("会议主题uuid") & "\'"
    cmd.ExecuteN onQuery()
End If


--  作者:有点蓝
--  发布时间:2022/4/28 10:21:00
--  
判断有没有开始状态不等于结束状态的行不就行了

SEL ECT Count(*) Fro m 会议议题 where uuid=\'" & vars("会议主题uuid") & "\' and 开始状态 <> 结束状态"

--  作者:cnsjroom
--  发布时间:2022/4/28 10:35:00
--  回复:(有点蓝)判断有没有开始状态不等于结束状态的...

也就是说  开始状态不等于结束状态  返回的值是零的话

就去更新会议状态表中的会议状态为true  对吧

谢谢!

 

vars("会议主题uuid")="0eb3c054-4314-4814-be47-99f6422651e6"

Dim cmd As New SQ LCommand
cmd.Connecti onN ame = "无纸化会议"
Dim dt,dt1 As DataTable
cmd.Comm andText = "SELE CT * F rom 会议状态 where uuid=\'" & vars("会议主题uuid") & "\'"
dt = cmd.Exe cuteReader()
Dim c As Integer
cmd.CommandText = "SELE CT Count(*) Fr om 会议议题 where uuid=\'" & vars("会议主题uuid") & "\'and 开始状态 <> 结束状态" \' \'and 开始状态=\'true\'" \'判断会议议题有多少符合开始状态为true数据的行\'
c= cmd.Exe cuteScalar
output.show(c)
If cmd.ExecuteScalar = 0 Then
    cmd.Com mandText = "UPD ATE 会议状态 SET 会议状态 = \'true\' where uuid=\'" & vars("会议主题uuid") & "\'"
    cmd.Execut eNonQuery()
End If

[此贴子已经被作者于2022/4/28 10:37:07编辑过]

--  作者:有点蓝
--  发布时间:2022/4/28 11:01:00
--  
If c = 0 Then