Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.C
cmd.CommandText = "SEL ECT * From {订单表}"
dt = cmd.ExecuteReader(True) '只有设置了true才可以保存数据
If dt.Find("订单编号 = '" & tr("订单编号") & "'") IsNot Nothing Then
MessageBox.show("PMC后台已存在此订单")
Return
Else
Dim drs As List(of DataRow)
drs = DataTables("订单表").Select("订单编号 = '" & tr("订单编号") & "'")
For Each dr As DataRow In drs
Dim nr As DataRow = dt.AddNew()
dr("订单状态") = "已提交PMC" '要放在前面,不然上传后的订单状态就还是门店新订单了
dr("同步状态") = "已同步"
For Each dc As DataCol In DataTables("订单表").DataCols
nr(dc.name) = dr(dc.name)
Next
Next
End If
dt.save
DataTables("订单表").save
MessageBox.show("提交完成")
我们是有两个数据源，一个本地，一个服务器，本地生成订单后提交到服务器数据库，这个代码就是用来提交订单的。
代码执行后，本地系统没发现问题，但是服务器数据出现了异常，异常的地方就在标红的这两个字段
此主题相关图片如下：微信截图_20171011115511.png
如图，所有记录都成功上传，但是【订单状态】和【同步状态】出现了一个订单不同值的情况，根据排查发现是跟本地系统提交数据时，数据表的current有关，current行及后面的行就正常，前面的就不正常，排查代码也没发现什么异常啊，请各位大大看看。
加好友 
发短信
Post By：2017/10/11 12:02:00 [只看该作者]
