Как вывести всплывающее сообщение пользователю?

 ПоказатьОповещениеПользователя("Документ не записан!", 
                                                      "http://doc.ru", 
                                                       "О правилах заполнения документа, читайте здесь!", 
                                                       БиблиотекаКартинок.Важно);   

 #Если Клиент Тогда
			Форма = Источник.ПолучитьФорму();
			Если Форма.Открыта() Тогда
				ПоказатьОповещениеПользователя("Ошибка", ПолучитьНавигационнуюСсылку(Источник.Ссылка), "Не указана организация. Невозможно распределить платежи по документам расчетов с контрагентом", БиблиотекаКартинок.Ошибка32);
			КонецЕсли;
		#КонецЕсли
   

 WshShell=СоздатьОбъект("WScript.Shell");
WshShell.Popup("Текст сообщения",,"Текст заголовка",20);

  //Процедура выводит или убирает сообщение мессенджера и иконку, в зависимости от бПарам
Процедура ВывестиСообщениеМессенджера(бПарам = Истина) Экспорт
#Если Клиент Тогда    
 
    сКаталог = СокрЛП(Константы.КаталогПолногоДоступа.Получить())+"БП\MessageService";
    ИмяФайла    = сКаталог + "\autohotkey.exe";
    Файл        = Новый Файл(ИмяФайла);
    
    ИмяФайлаИНИ = сКаталог + "\autohotkey.ini";
    
    Если бПарам Тогда
        ИмяФайлаИНИ_Задачи = сКаталог + "\autohotkey_Yes.ini";
    Иначе
        ИмяФайлаИНИ_Задачи = сКаталог + "\autohotkey_No.ini";
    КонецЕсли;
    
    ФайлИНИ_Задачи = Новый Файл(ИмяФайлаИНИ_Задачи);
    
    Если Файл.Существует() И ФайлИНИ_Задачи.Существует() Тогда
        
        Попытка                                                                      
            КопироватьФайл(ИмяФайлаИНИ_Задачи,ИмяФайлаИНИ);
            ЗапуститьПриложение(ИмяФайла, сКаталог);
            Если бПарам Тогда 
                ПараметрыСеанса.бСостояниеМессенджера = Истина;
            Иначе
                ПараметрыСеанса.бСостояниеМессенджера = Ложь;
            КонецЕсли;
        Исключение
            
        КонецПопытки;
        
    КонецЕсли;
#КонецЕсли 
КонецПроцедуры