Вт мар 12, 2019 10:26 am Вт мар 12, 2019 10:26 am
Вт мар 12, 2019 10:26 am Вт мар 12, 2019 10:26 am
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.
Алексей Пикуров писал(а):Не надо костылей, это плохой способ.
т.е. мне нужно сначала вручную структуру папок создать
MyChat Server [+] (22.04.2024) обновлённый и[…]
Это формируете вы, система контроля рабочего време[…]
К сожалению проблема не решена, вы можете отключит[…]
Подскажите, в версии 3.3 починили эту проблему? А […]
Георгий дал вам ссылку на справку, расположенную н[…]
Здравствуйте. 1. Откройте описание ошибки в спра[…]
Спасибо, исправлено . Мы вышлем вам обновление и[…]
Вот ссылка на Google Drive . В AppGallery обновле[…]
Во время звонка разобрались. Чтобы узнать группу п[…]
Спасибо за зеркало забрал оттуда и обновил. Вопрос[…]
добрый день, уважаемые разработчики! ошибка перес[…]