以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]违反唯一约束条件  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=107279)
--  作者：ymjr2011
--  发布时间：2017/9/25 8:20:00
--  [求助]违反唯一约束条件
A复制到B表，字段结构基本相同，由于B表ID字段非自增益字段，经过上一贴修正后仍出现“违反唯一约束条件”

datarowadding:
Dim Int As Double
If e.DataTable.DataRows.Count> 0 Then
    int = e.DataTable.SQLCompute("max(id)")
    e.DataRow("ID") = Int +1 
Else
    e.DataRow("ID") =1
End If
e.DataRow.Save

烦请协助再给个解决方案
--  作者：有点甜
--  发布时间：2017/9/25 8:38:00
--  
写到 DataRowAdded 事件。
--  作者：ymjr2011
--  发布时间：2017/9/27 7:41:00
--  
同样也出现“违反唯一约束条件”，而且复制到表B只产生了ID号，数据是空的
--  作者：有点甜
--  发布时间：2017/9/27 9:19:00
--  

id列赋值成功，说明你上面的代码没问题。

 

其它列无法赋值，贴出你写的代码。新增一行不能用tables().AddNew，只能用DataTables().AddNew