Функция копирования, удаления файлов MyChat Script Language
Добавлено: Вт мар 12, 2019 10:26 am
Хочу скриптом получить список файлов с учетом рабочего времени, скопировать их в сетевую папку, удалить на сервере.
Форум Network Software Solutions
https://nsoft-s.com/forum/
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.
Алексей Пикуров писал(а):Не надо костылей, это плохой способ.
т.е. мне нужно сначала вручную структуру папок создать