需求:如何实现将表A的[状态] = ‘已审核’"的全部数据,导入表B, 如果表的A[状态]列任意一个或一行 [状态] 不是 ‘已审核’",都不能执行导入?
下面代码是将满足条件的数据导入,不满足的数据不导入,如何改写为只有全部条件满足才能执行导入?
Dim Cols1() As String = {"列一","列二","列三"}
Dim Cols2() As String = {"列一","列二","列三"}
For Each dr1 As DataRow In DataTables("表A").Select("[状态] = ‘已审核’")
Dim dr2 As DataRow = DataTables("表B").AddNew()
For i As Integer = 0 To Cols1.Length -1
dr2(Cols2(i)) = dr1(Cols1(i))
Next
Next