MyChat Scripts: функция mExtractUserPhoto, сохранить фото пользователя в файл
"Для разработчиков", "Серверные скрипты", "Описание функций", "Пользователи", "mExtractUserPhoto".
Экспорт фотографии пользователя MyChat в файл на диске. Фото сохраняется в формате JPG.
Синтаксис
function mExtractUserPhoto(iUIN: integer; sPath, sFileName: string): integer;
Параметры и возвращаемые значения
|
Параметр |
Тип |
Значение |
|
iUIN |
integer |
уникальный идентификатор пользователя; |
|
sPath |
string |
путь на диске, куда необходимо сохранить фотографию. Должен существовать; |
|
sFileName |
string |
название файла для экспорта до точки. Например, "myfile". Расширение ".jpg" функция добавит автоматически в конец. |
Результат функции
0, если экспорт прошёл успешно;
-1, пользователь с таким UIN не найден на сервере;
-2, у пользователя нет фотографии в профиле;
-3, путь для экспорта указан неверно или папка не существует;
-4, ошибка сохранения файла (нет места на диске, ошибка записи на защищённый диск, нет прав для записи и т.п.).
Пример
Экспорт всех фотографий пользователей в папку сервера c:\temp\photos\
var
sUsersList: string;
iUIN: integer;
begin
sUsersList := mGetUsersListByState(-2);
while length(sUsersList) > 0 do begin
iUIN := strtoint(Fetch(sUsersList, ','));
mExtractUserPhoto(iUIN,
'c:\temp\photos\',
'(' + inttostr(iUIN) + ') ' + mGetUserAttribute(iUIN, 'DisplayName'));
end;
end.
Результат работы скрипта
[15:38:21] (Run "ExtractAllUserPhotos"): Время выполнения скрипта: 695 мс
[15:38:21] (Run "ExtractAllUserPhotos"): Скрипт выполнен успешно.