订单重复执行的问题
If e.CommandName = "CheckOut" Then
Dim dbw As New DBWarehouse
Dim dbo As New DBOrderSale
Dim dt As New DataTable
Dim OrderID, StatusID As Integer
'获取操作的订单号
OrderID = e.CommandArgument
dt = dbo.GetOrderSaleByID(OrderID)
'得到订单状态
StatusID = dt.Rows(0).Item("StatusID")
'如果不是新订单,退出
If StatusID <> 1 Then
lblMessage.Text = "订单状态不符!"
Exit Sub
End If
Try
'建立事务
Using scope As New TransactionScope()
'订单内容添加到库存变化
dbw.AddWarehouseFromOrderSale(OrderID)
'订单状态修改为已出库
dbo.UpdateOrderSaleStatus(OrderID, 10)
scope.Complete()
End Using
Catch
End Try
BindGridView()
End if
几万个订单会有一个重复出库,怎么回事?