不知名的错误导致保存失败
因业务需要,把一个表的数据同步到其他的数据库,两表的数据结构一致
用狐表做了一个数据交换的,直接通过狐表操作数据库
先通过数据分析,找出需要新增的数据,放入lst1
再把数据保存到对方数据库,用了一下代码
For Each dr As DataRow In lst1
dri = DataTables("dsj_" & tbn).AddNew()
For Each dc As DataCol In DataTables("dsj_" & tbn).datacols
dri(dc.name) = dr(dc.name)
msgbox(dc.name + ":" + dr(dc.name).Tostring)
Next
dri.save()
Next
一开始程序没有问题,但是发现后来不行了
今天检查代码和错误,发现代码在执行时,提示一下错误
明明两表是一样的数据结构,每个字段都是同样的,为什么会出现这个错误呢?