Como fazer transação em Delphi (Sql Server)?
Oi gente,
Estou precisando muito de ajuda. Sou iniciante e, fiz uma pequena aplicação em Delphi 7 e Sql Server 2000 que faz algumas operações como: ler um arquivo, gravar informações em algumas tabelas e depois gera um outro arquivo, tudo isto deve acontecer de forma única e, se algo der errado, seja com arquivo ou no momento de insersão nas tabelas, a operação deve ser totalmente cancelada.
Estou encontrando vários obtáculos, um deles é que eu conheço transação em SQL Server, porém nunca utilizei este conceito dentro do Delphi. Não sei qual componente devo usar. Para fazer operações de insersão e todas as demais uso ADOQuery. Mas e transação eu tb posso usar ADOQuery?
Conto com a ajuda de vcs para achar uma ´luz no fim do túnel´.
Muito Obrigada,
Aline.
Estou precisando muito de ajuda. Sou iniciante e, fiz uma pequena aplicação em Delphi 7 e Sql Server 2000 que faz algumas operações como: ler um arquivo, gravar informações em algumas tabelas e depois gera um outro arquivo, tudo isto deve acontecer de forma única e, se algo der errado, seja com arquivo ou no momento de insersão nas tabelas, a operação deve ser totalmente cancelada.
Estou encontrando vários obtáculos, um deles é que eu conheço transação em SQL Server, porém nunca utilizei este conceito dentro do Delphi. Não sei qual componente devo usar. Para fazer operações de insersão e todas as demais uso ADOQuery. Mas e transação eu tb posso usar ADOQuery?
Conto com a ajuda de vcs para achar uma ´luz no fim do túnel´.
Muito Obrigada,
Aline.
@line
Curtidas 0
Respostas
Dataclass
10/09/2004
Aline, seria algo deste tipo:
Não estou mais usando SQLServer nem MSAccess mas deve funcionar.
Espero ter sido útil.
ADOConnection1.BeginTrans;
try
{operações desejadas e as vezes arriscadas ....}
ADOConnection1.CommitTrans;
except
ADOConnection1.RollbackTrans;Não estou mais usando SQLServer nem MSAccess mas deve funcionar.
Espero ter sido útil.
GOSTEI 0
Dataclass
10/09/2004
Faltou um ´end´ .
ADOConnection1.BeginTrans;
try
{operações desejadas e as vezes arriscadas ....}
ADOConnection1.CommitTrans;
except
ADOConnection1.RollbackTrans;
end;
GOSTEI 0