com CommitTrans, RoolbackTrans

Olá pessoal!

Estou com uma duvida com usar o BeginTrans, RoobackTrans e CommitTrans em um procedimento que está desta forma:

set spGrava = Server.CreateObject("ADODB.Command") spGrava.ActiveConnection = conexao spGrava.CommandText = "spGRAVA_INFO" spGrava.CommandType = 4 spGrava.CommandTimeout = 3000 spGrava.Prepared = true spGrava.Parameters.Append spGrava.CreateParameter("@RETURN_VALUE", 3, 4,50) spGrava.Parameters.Append spGrava.CreateParameter("@var1", 3, 1,50,var1) spGrava.Parameters.Append spGrava.CreateParameter("@var2", 3, 1,50,var2) spGrava.Parameters.Append spGrava.CreateParameter("@var3", 3, 1,50,var3) spGrava.Parameters.Append spGrava.CreateParameter("@var4", 3, 1,50,var4) spGrava.Parameters.Append spGrava.CreateParameter("@var5", 3, 1,50,var5) spGrava.Parameters.Append spGrava.CreateParameter("@var6", 129, 1,50,var6) spGrava.Parameters.Append spGrava.CreateParameter("@var7", 129, 1,50,var7) spGrava.Parameters.Append spGrava.CreateParameter("@var8", 200, 1,50,var8) spGrava.Parameters.Append spGrava.CreateParameter("@var9", 3, 1,50,var9) spGrava.Parameters.Append spGrava.CreateParameter("@var10", 200, 1,50,var10) spGrava.Parameters.Append spGrava.CreateParameter("@var11", 3, 1,50,var11) spGrava.Parameters.Append spGrava.CreateParameter("@var12", 3, 1,50,var12) spGrava.Execute()

Desde já agradeço a todos!!