If e.DataCol.name = "shuliang" Then
If e.DataRow("shuliang") Then
Dim t As Table = Tables("weixindanhao.weixin.weixinminxi")
For i As Integer = t.rows.count-1 To 0 Step -1
t.rows(i).delete
Next
Dim cc As Integer =e.DataRow("shuliang")
t.addnew(cc)
t.save()
End If
想在上面红色的部分添加下面的条件
如果weixinminxi 表的 name 的最大 id < minxi 表相同name的最大id then
else 提示 缺少库存数量,并且结束
场景:1
商品a minxi表的 最大 最大id 为10
商品a weixinminxi表的 最大 id 为 5
dim f as inter = minxi表的最大id - weixinmingxi表的最大id
then
t.addnew(f)
t.save
masess("缺少5个库存“)
场景:2
商品a minxi表的 最大 最大id 为10
商品a weixinminxi表的 最大 id 为 10
dim f as inter = minxi表的最大id - weixinmingxi表的最大id
then
masess("缺少10个库存“)
[此贴子已经被作者于2016/5/28 23:19:40编辑过]