è già tutto in una transaction
ti invio parte di codice
Dim cmd As SqlCommand
Dim cntIns As SqlCommand
Dim artIns As SqlCommand
Dim artUpd As SqlCommand
cmd = New SqlCommand("USR_SP_SEL_VNCCOUNTER", oConnection)
cmd.CommandType = CommandType.StoredProcedure
cmd.Parameters.Add("@VNCNUM", SqlDbType.VarChar, 8).Value = _numero
_adpCounter = New SqlDataAdapter(cmd)
cntIns = New SqlCommand("USR_SP_INS_VNCCOUNTER", oConnection)
cntIns.CommandType = CommandType.StoredProcedure
cntIns.Parameters.Add("@VNCTYPE", SqlDbType.VarChar, 2, "VNCTYPE")
cntIns.Parameters.Add("@USRID", SqlDbType.Int, 0, "USRID")
_adpCounter.InsertCommand = cntIns
_adpCounter.Fill(_ds, "VNCCOUNTER")
cmd.CommandText = "USR_SP_SEL_VNCARTS"
_adpArts = New SqlDataAdapter(cmd)
artIns = New SqlCommand("USR_SP_INS_VNCARTS", oConnection)
artIns.CommandType = CommandType.StoredProcedure
artIns.Parameters.Add("@VNCNUM", SqlDbType.VarChar, 8, "VNCNUM")
artIns.Parameters.Add("@ARTNAME", SqlDbType.VarChar, 24, "ARTNAME")
artIns.Parameters.Add("@ARTDISE", SqlDbType.VarChar, 24, "ARTDISE")
artIns.Parameters.Add("@ARTDESC", SqlDbType.VarChar, 30, "ARTDESC")
artIns.Parameters.Add("@ARTQTA", SqlDbType.Decimal, 18, "ARTQTA")
artUpd = New SqlCommand("USR_SP_UPD_VNCARTS", oConnection)
artUpd.CommandType = CommandType.StoredProcedure
artUpd.Parameters.Add("@VNCNUM", SqlDbType.VarChar, 8, "VNCNUM")
artUpd.Parameters.Add("@ARTID", SqlDbType.Int, 0, "ARTID")
artUpd.Parameters.Add("@ARTNAME", SqlDbType.VarChar, 24, "ARTNAME")
artUpd.Parameters.Add("@ARTDISE", SqlDbType.VarChar, 24, "ARTDISE")
artUpd.Parameters.Add("@ARTDESC", SqlDbType.VarChar, 30, "ARTDESC")
artUpd.Parameters.Add("@ARTQTA", SqlDbType.Decimal, 18, "ARTQTA")
_adpArts.InsertCommand = artIns
_adpArts.UpdateCommand = artUpd
_adpArts.Fill(_ds, "VNCARTS")
_ds.AcceptChanges()
cntIns.Dispose()
artIns.Dispose()
artUpd.Dispose()
cmd.Dispose()
End Sub
questi sono gli adapter poi le SP sono già dentro una transaction