qry2 = "begin transaction" & vbcrlf
qry2 = qry2 & "INSERT INTO dbo.DOC_DETT ( DOCODCLI , DODESART , DONUMDOC ) "
qry2 = qry2 & "VALUES ( " + replace(docodcli,"'","''") + " , '" + replace(desart,"'","''") + "' , " + replace(donumdoc,"'","''") + " ) " & vbcrlf
qry2 = qry2 & "if @@error <> 0 begin rollback RETURN end" & vbcrlf
qry2 = qry2 & "COMMIT TRANSACTION" & vbcrlf
dove sbaglio??