IUserEmails.Mobile

Синтаксис Fore

Mobile: String;

Синтаксис Fore.NET

Mobile: System.String;

Описание

Свойство Mobile устанавливает мобильный электронный почтовый адрес.

Комментарии

Мобильный электронный почтовый адрес устанавливается в окне «Личные данные».

Пример Fore

Для выполнения примера добавьте ссылку на системную сборку Metabase. Добавим в профиль текущего пользователя репозитория адреса рабочей, персональной и мобильной электронной почты:

Sub UserProc;
Var
    Mb: IMetabase;
    User: IMetabaseUser;
    Prof: IUserProfile;
    Emails: IUserEmails;
    
Begin
    Mb := MetabaseClass.Active;
    User := Mb.LogonSession.User;
    Prof := User.Profile.Edit;
    Emails := Prof.Emails;
    Emails.Mobile := "user_mobile@example.ru";
    Emails.Working := "user_work@example.ru";
    Emails.Personal := "user_personal@example.ru";
    Prof.Apply;
End Sub UserProc;

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

Пример Fore.NET

Добавим в профиль текущего пользователя репозитория адреса рабочей, персональной и мобильной электронной почты. Указанная процедура является точкой входа для .NET-сборки:

Public Shared Sub Main(Params: StartParams);
Var
    Mb: IMetabase;
    User: IMetabaseUser;
    Prof: IUserProfile;
    Emails: IUserEmails;
Begin
    Mb := Params.Metabase;
    User := Mb.LogonSession.User;
    Prof := User.Profile.Edit();
    Emails := Prof.Emails;
    Emails.Mobile:= "user_mobile@example.ru";
    Emails.Working := "user_work@example.ru";
    Emails.Personal := "user_personal@example.ru";
    Prof.Apply();
End Sub;

Результат выполнения примера аналогичен результату примера для Fore.

См. также:

IUserEmails