TransctionTab11 = fLogin.connection.BeginTransaction("SampleTransaction")

If _dataCharBuildEditState = 0 Then 'обновление(старой)
                    adCharBuild.UpdateCommand = New SqlCommand("UPDATE [TStructBild]" & _
            " SET [Storey] = @Storey " & _
              ",[Footer] = @Footer" & _
              ",[Garret]= @Garret" & _
             " ,[Area] = @Area" & _
              ",[AreaAp] = @AreaAp" & _
              ",[id_DWal] =@id_DWal" & _
             " ,[Other] = @Other " & _
            "WHERE [id_Obj]=@IdObj and [Id_StrBild]=@fIdCharBuild ", fLogin.connection)

' передача параметров
               
               adCharBuild.UpdateCommand.Transaction = TransctionTab11
               adCharBuild.UpdateCommand.ExecuteNonQuery()