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

jj: translate db timeout message box

Browse Source
This commit is contained in:
Jonathan Jenne 2018-06-26 17:18:14 +02:00
parent dd19812cbf
commit f87bbe40e2
1 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
Global_Indexer/frmStart.vb
View File

@ -672,7 +672,15 @@ Public Class frmStart
If ClassDatabase.DatabaseConnectionTimeout = True Then If ClassDatabase.DatabaseConnectionTimeout = True Then
TimerFolderWatch.Enabled = False TimerFolderWatch.Enabled = False
Dim result = MsgBox($"Database could not be reached. Global Indexer will NOT work without a database!{vbCrLf}{vbCrLf}Please check your connection.{vbCrLf}The Application will exit now.", MsgBoxStyle.Critical, "Critical Error") Dim title = "Critical Error"
Dim message = $"Database could not be reached. Global Indexer will NOT work without a database!{vbCrLf}{vbCrLf}Please check your connection.{vbCrLf}The Application will exit now."
If USER_LANGUAGE = "de-DE" Then
title = "Kritischer Fehler"
message = $"Die Datenbank konnte nicht erreicht werden. Global Indexer funktioniert NICHT ohne Datenbankverbindung{vbCrLf}{vbCrLf}Bitte überprüfen Sie Ihre Netzwerkverbindung oder benachrichtigen Sie Ihren Administrator.{vbCrLf}Die Anwendung wird nun geschlossen."
End If
Dim result = MsgBox(message, MsgBoxStyle.Critical, title)
If result = MsgBoxResult.Ok Then If result = MsgBoxResult.Ok Then
Application.ExitThread() Application.ExitThread()