예전에  올린줄  알았는데..  찾아보니  없군여.

아실수도  있지만  공유를  위하야..



전제조건은  sql서버에서  distributed  Transaction  coordinator가  시작중이어야  합니다.



제가  테스트할때는  update를  50개  걸때는  오류가  좀  발생하는  거  같슴다.

10개  이하면  충분히  커버할수  있을듯..



'트렌젝션  시작  

On  Error  Resume  Next

dbcon.BeginTrans



sql  =  "원하는  sql문"

set  rs  =  dbcon.execute(sql)

ErrorNum  =  ErrorNum  +  dbcon.Errors.Count

set  rs  =  nothing



sql  =  "원하는  sql문"

set  rs  =  dbcon.execute(sql)

ErrorNum  =  ErrorNum  +  dbcon.Errors.Count

set  rs  =  nothing



if  ErrorNum  =  0  then

    DbCon.CommitTrans

else

      DbCon.RollbackTrans

end  if

날짜: 2003-10-24 16:54:03, 조회수: 2289