fbpx

CommitTrans, BeginTrans, RollBack

CommitTrans, BeginTrans, RollBack no Visual Basic

Imagine que você tenha um processamento de diversas operações em um banco de dados e somente após a realização destes processos as alterações sejam realizadas de fato no Banco de dados.
Utilizando BeginTrans, CommitTrans e RollBack você pode executar estes processos sem problemas permitindo que o processamento das alterações só tenham efeito após uma confirmação final dada pelo usuário.

BeginTrans – Dá inicio ao processamento
CommitTrans – Conclui a transação
RollBack – Repõe a situação anterior, ou melhor, não executa a transação.

Exemplo:

Sub begintrans()

wrk.BeginTrans
With tblWmundi
Do Until .EOF
.Edit
tbltit![VencBas] = tbltit![VencBas] * 2.5
.Update
.MoveNext
Loop
If MsgBox(“Confirma Alterações ?”, vbYesNo) = vbYes Then
wrk.CommitTrans
Else
wrk.Rollback
End If
End With

End Sub

Compartilhe esta matéria
  , ,


Deixe uma resposta

O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *

Esse site utiliza o Akismet para reduzir spam. Aprenda como seus dados de comentários são processados.