|
|
|
|
|
|
|
|
Dicas
|
|
|
Visual Basic (Banco de Dados)
|
|
 |
Título da Dica: BeginTrans, CommitTrans, RollBack (transações)
|
 |
|
|
|
Postada em 13/9/2003 por ~Ð@®£@Ñ
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
|
|
|
|
|
