У нас есть два приложения.
- Main.exe - основного обновляемого приложения
- Update.exe - программа, которая запускает обновление Main.exe
Моя проблемапредотвращает доступ пользователей к файлу main.exe во время обновления.
Сейчас я проверяю файл флага, и если файл флага существует, немедленно выполняется application.exe.
Это нормальнокроме того, что он ничего не говорит пользователю, просто выгоняет его.
Я должен был выпустить сообщение, время, которое требуется им для ответа на сообщение, main.exe используется и не можетбыть обновленным.
Любые предложения, как я могу профессионально отобразить сообщение о том, что обновление выполняется, закрытие приложения?
Кстати, я подумал об использовании:
Private Function IsUpdatingPropane() As Boolean
Try
Dim UpdateInprocess As String = My.Computer.FileSystem.GetParentPath(Application.StartupPath) & "\update.inprocess"
If File.Exists(UpdateInprocess) Then
'Dim Proc As Process
'Dim ProcInfo As New ProcessStartInfo(Configuration.DataFileLocations & Configuration.GasLibrary & "\vbmsg.exe")
'ProcInfo.Arguments = String.Format("vbmsg.txt,{0},{1},NIL,NIL,NIL,OK,9996,9997", Configuration.UserId, Configuration.WorkstationId)
'ProcInfo.WindowStyle = ProcessWindowStyle.Normal
'ProcInfo.WorkingDirectory = Configuration.DataFileLocations & Configuration.GasLibrary
'ProcInfo.UseShellExecute = False
'Proc = Process.Start(ProcInfo)
Application.Exit()
Return True
End If
Return False
Catch ex As Exception
WriteException(ex)
WriteDebugInfo("VerifyNotUpdatingPropane", "An error occurred while checking for update.inprocess file. Please contact SSS for assistance.", True, ex)
Return True
End Try
End Function
но что мне звонить, чтобы отобразить сообщение?
Заранее спасибо!