From 51813675e265bf1b20939526e45066ec7fa57f9d Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Mon, 11 Jun 2018 11:09:08 +0200 Subject: [PATCH] jj: check for exe before starting user manager --- app/DD_PM_WINDREAM/frmProfileDesigner.vb | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) diff --git a/app/DD_PM_WINDREAM/frmProfileDesigner.vb b/app/DD_PM_WINDREAM/frmProfileDesigner.vb index 325d41d..291891c 100644 --- a/app/DD_PM_WINDREAM/frmProfileDesigner.vb +++ b/app/DD_PM_WINDREAM/frmProfileDesigner.vb @@ -940,13 +940,17 @@ Public Class frmProfileDesigner Dim userManagerPath As String = clsModules.GetModulePath("User Manager") If userManagerPath Is Nothing Then - MsgBox("User Manager konnte nicht gefunden werden!", MsgBoxStyle.Critical) + MsgBox("Pfad zu User Manager konnte nicht gefunden werden!", MsgBoxStyle.Critical) Else Dim exePath As String = Path.Combine(userManagerPath, "DDUserManager.exe") - Dim psi As New ProcessStartInfo(exePath) - Process.Start(psi) + If File.Exists(exePath) Then + Dim psi As New ProcessStartInfo(exePath) + Process.Start(psi) + Else + MsgBox("Programm User Manager konnte nicht gefunden werden!", MsgBoxStyle.Critical) + End If End If Catch ex As Exception MsgBox("Error while startign User Manager:" & vbCrLf & ex.Message, MsgBoxStyle.Critical)