窗口sqltable临时表，遍历并保存修改过的行时仅能保存第一条，
第二条就会报错：已添加了具有相同键的项。
【居然是每次都要new SQLCommand】
For Each r As Row In t1.Rows
If r.DataRow.RowState = DataRowState.Modified Then
Dim cmd As new S_QLCommand
c_md.C
c_md.CommandText = "u_pdate 客户端窗口下拉框列表项 set 操作类别=?,授权部门=?,列表项目=?,是否可用=?,排序=? where [_identify] =?"
c_md.Parameters.Add("@操作类别",r("操作类别"))
c_md.Parameters.Add("@授权部门",r("授权部门"))
c_md.Parameters.Add("@列表项目",r("列表项目"))
c_md.Parameters.Add("@是否可用",IIF(r("是否可用")=True,1,0))
c_md.Parameters.Add("@排序",r("排序"))
c_md.Parameters.Add("@_identify",r("_identify"))
c_md.ExecuteNonQuery
r.DataRow.Save
End If
Next
[此贴子已经被作者于2019/3/22 17:08:56编辑过]
加好友 
发短信
Post By：2019/3/22 16:42:00 [只看该作者]
