AppStd/Monorepo
8
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

MS

Browse Source
This commit is contained in:
SchreiberM
2022-05-19 17:23:41 +02:00
parent 0c23878301
commit 5448240b46
19 changed files with 340 additions and 161 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
GUIs.ZooFlow/Modules/Globix/frmGlobixBasicConfig.vb
View File

@@ -44,12 +44,15 @@ Public Class frmGlobixBasicConfig
Logger.Info(">> Unexpected error in CheckFolder: " & pMypath)
Logger.Error(ex.Message)
Logger.Info(" >> " & ex.Message)
If My.Application.User.Language = "de-DE" Then
MsgBox("Unexpected error in ECheckFolder: " & pMypath & vbNewLine & "Bitte überprüfen Sie die Rechte!" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
Else
MsgBox("Error in creating Hotfolder: " & pMypath & vbNewLine & "Please check the rights!" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End If
Dim otext As String
If My.Application.User.Language = "de-DE" Then
otext = "Unexpected error in ECheckFolder: " & pMypath & vbNewLine & "Bitte überprüfen Sie die Rechte!" & vbNewLine & ex.Message
Else
otext = "Error in creating Hotfolder: " & pMypath & vbNewLine & "Please check the rights!" & vbNewLine & ex.Message
End If
Dim oMsgBox As New Dialog1("No Match- There might be an error in the RegEx!", "", True)
oMsgBox.ShowDialog()
Exit Sub
End Try