Хочу скриптом получить список файлов с учетом рабочего времени, скопировать их в сетевую папку, удалить на сервере.

Делаю костыль.
Читаю большой Файл хочу его записать но получаю ошибку
Время выполнения скрипта: 5284 мс
[11:24:01] (RunError "22"): Script timed out
Как обойти это ограничение?

Код: Выделить всё

 var             
    UsersCount, I, N, ID, ii: integer;
                    Str, Msg, ms, Date, User, str1, str2, str3,str4, KKS, Status, sMsg, sGroupsOriginal, sCurrentGroup, sUsersList, sUIN, sResult, Group, sOld, sToday : string;

begin            
                UsersCount:= GetTextFileLinesCount(mGetServerServiceFolder(8) + '\2019\03\06\worktime.csv');
                For i:=1 to UsersCount do
                Begin
                ms:=msg; //сохраняем Msg в ms
                    LoadLineFromFile(mGetServerServiceFolder(8) + '\2019\03\06\worktime.csv',i,str);//вычитываем строку из файла
                    sMsg:= str+CRLF;  
                    AddLineToFile(sMsg, '\\net\log2.txt');
                      mLogScript(str, '');
                End;
         //mSendPrivateMessage(0, 8, sMsg, 1, true);
    end.

[Алексей Пикуров]

Не надо костылей, это плохой способ. Таймаут можете установить вручную, функция SetScriptTimeOut.

Team lead
Чат со мной

Не надо костылей, это плохой способ.

Так нет функции копирования вот и приходится костыли делать

[Алексей Пикуров]

Вы правы, надо сделать Всё предусмотреть же невозможно, делаем новые функции по запросам людей.

Team lead
Чат со мной

т.к. у файлов одинаковое имя то логично бы копировать всю структуру папок а не только файлы, т.е. нужна еще и функция копирования, переноса папок

[Алексей Пикуров]

Посмотрим, не спешите.

Team lead
Чат со мной

[Алексей Пикуров]

Реализовано. Свежую сборку сервера выложим сегодня на сайт, обновитесь завтра.

Team lead
Чат со мной

Большое спасибо за оперативность!!!
Одна проблема: В описании написано
Исходная и результирующая папки должны существовать.
т.е. мне нужно сначала вручную структуру папок создать а уже потом переносить
2019\03\01
2019\03\02
2019\03\03
...
2019\03\31
2019\04\01
2019\04\02
2019\04\03
...
2019\04\31

[Алексей Пикуров]

т.е. мне нужно сначала вручную структуру папок создать

Да.

Терпение, делаем функцию для создания папок "с потрохами" и отдельную функцию CopyFile.

Team lead
Чат со мной

[Алексей Пикуров]

Бонус-трек подвезли.

Team lead
Чат со мной