"Мадорский Г.В." <[EMAIL PROTECTED]> сообщил/сообщила в новостях следующее: news:[EMAIL PROTECTED] > > Давно уже голову ломаю, может кто подкинет идею. > > Вообщем пару месяцев назад с репликацией какие-то странности начались. При > выгрузке иногда (один раз из 200-300 ) стали формироваться zip-файлы нулевой > длины. Ну ладно, где-то сбой. Толи у меня в программе (все вылизал - ничего > не нашел), толи в компоненте, который zip-архив создает, толи в win... > Плюнул, написал проверку длины файла и нифига... Вообщем программа выглядит > так : > > Err := False; > Transaction.StartTransaction (snapshort) > try > Tут идет выборка данных для репликации из базы на основании лог-таблицы > и проставление в ней номера пакета, в который эти данные попадают. > Запись выбранных данных в cds и сохранение на диск. > Упаковка полученных файлов в zip и удаление *.cds. > except > Err := True; > end; > > If (not Err) and (FileSize(FileNm) > 0) then > Transaction.Commit > else begin > Transaction.Rollback; > if FileExists(FileNm) then > DeleteFile(FileNm); > end;
Попробуй логировать все эксепшены. Потом лог посмотришь и найдёшь ошибку. Мне помоголо.
