diff --git a/VERSION b/VERSION
index 0495c4a..e8ea05d 100644
--- a/VERSION
+++ b/VERSION
@@ -1 +1 @@
-1.2.3
+1.2.4
diff --git a/src/MainImpl.bas b/src/MainImpl.bas
index 335e7ad..5e17439 100644
--- a/src/MainImpl.bas
+++ b/src/MainImpl.bas
@@ -215,10 +215,10 @@ Public Function UpdateConceptPowershell() As Boolean
     Exit Function
   
   On Error GoTo RETURN_FALSE
-  Dim sExec$: sExec = "cmd.exe /c " & """" & sInstall & """" & " < nul"
+  Dim sExec$: sExec = "explorer.exe " & CP_TOOLS_SERVER
   Dim iShell As New WshShell
-  iShell.CurrentDirectory = CP_TOOLS_SERVER
-  UpdateConceptPowershell = iShell.Run(sExec, waitOnReturn:=True) = 0
+  Call iShell.Run(sExec, waitOnReturn:=True)
+  UpdateConceptPowershell = True
   Exit Function
 
 RETURN_FALSE:
diff --git a/src/z_UIMessages.bas b/src/z_UIMessages.bas
index 1b88709..1194057 100644
--- a/src/z_UIMessages.bas
+++ b/src/z_UIMessages.bas
@@ -58,7 +58,7 @@ Public Function UIShowMessage(theCode As MsgCode, ParamArray params() As Variant
   Case IM_CONVERT_CODEPAGE_OK:      Call MsgBox("Корректировка выполнена", vbInformation)
   Case IM_UNIQUE_BOOKMARKS_OK:      Call MsgBox("Пересоздание закладок завершено", vbInformation)
   Case IM_REMOVE_ACCENTS_OK:        Call MsgBox(Fmt("Удалены ударения: {1}", unwrapped), vbInformation)
-  Case IM_CONCEPT_UPDATE_OK:        Call MsgBox("Офисные продукты КОНЦЕПТ обновлены успешно", vbInformation)
+  Case IM_CONCEPT_UPDATE_OK:        Call MsgBox("Закройте приложения MS Office. Запустите файл install.bat в открытом окне для обновления", vbInformation)
   Case IM_COMMENT_EXPORT_OK:        Call MsgBox(Fmt("Выгружено примечаний: {1}", unwrapped), vbInformation)
   Case IM_BOOKMARK_IGNORED:
     Call MsgBox(Fmt("Выделенная область добавлена в игнорируемые" & vbNewLine & _