&НаСервере
Процедура ОтправкаПочты(Команда)
	// Вставить содержимое обработчика.
	//Процедура УстановитьСоединение()    
    Профиль = Новый ИнтернетПочтовыйПрофиль;
    Профиль.АдресСервераSMTP = "smtp.mail.ru";
    Профиль.АдресСервераPOP3 = "pop.mail.ru";
    Профиль.ПортPOP3 = 995 ;
    Профиль.ПортSMTP =  465;
    Профиль.Пользователь = "robot_bot111234@mail.ru";
    Профиль.Пароль = "123Ф";
    Профиль.ПользовательSMTP = "robot_bot1112345@mail.ru";
    Профиль.ПарольSMTP = "123";
    Профиль.АутентификацияSMTP = СпособSMTPАутентификации.Login;
    Почта = Новый ИнтернетПочта;
    
   // Создадим почтовое сообщение
 
    Письмо = Новый ИнтернетПочтовоеСообщение;
    Текст = Письмо.Тексты.Добавить("Отдай мне мои тетрадки");
    Текст.ТипТекста = ТипТекстаПочтовогоСообщения.ПростойТекст;
    Письмо.Тема = "Пробное письмо"; 
    Письмо.Отправитель = "robot_bot111234@mail.ru";
    Письмо.ИмяОтправителя = "Саша";
    Письмо.Получатели.Добавить("cat_bot1234@mail.ru");
       
    Попытка
        Почта.Подключиться(Профиль);
        Сообщить("Подключенено");
        Почта.Послать(Письмо);
        Сообщить("Письма отправлены");
    Исключение
        Сообщить("Не удалось подключиться к серверу");
        Сообщить(ОписаниеОшибки());
    КонецПопытки;
    
    Почта.Отключиться();
    Сообщить("Соединение завершено");
КонецПроцедуры