en teoria debera ser algo como :
Código:
<%
Set conexion = CreateObject("ADODB.Connection")
conexion.ConnectionString="DSN=miDSN"
'Esto aisla totalmente la transaccion del resto de transacciones
conexion.IsolationLevel = 1048576
conexion.open
'Activamos la transaccion
conexion.beginTrans
Set rs = CreateObject("ADODB.Recordset")
sql = "insert into T_Tabla1"
rs.open sql,conexion
sql = "insert into T_Tabla2"
rs.open sql,conexion
sql = "insert into T_Tabla3"
rs.open sql,conexion
'Si no hubieron problemas realizamos los cambios
' y si hubieron problemas deshacemos lo hecho
if (conexion.Errors.Count > 0) then
conexion.RollBackTrans
else
conexion.CommitTrans
end if
%>
Se supone que si todo es correcto se ejecuta el CommitTrans y se producen todos los cambios, y digo yo, ¿la transaccion bloquea la base de datos mientras ella esta dale que te pego?, por que esa seria a unica forma de que esto funcione bien...
ToKaTa.