Gestione comunicazione errori nel programma.

2022-11-21 10:57:50 +01:00
parent 1afdc8551f
commit 4e0d362b36
1 changed files with 3 additions and 1 deletions
@@ -1349,7 +1349,9 @@ Public Class AlarmsPageUC
      ' Verifico condizioni di errore
      If nErr <> 0 And bExec Then
         ' Errore in tastatura lama
-         EgtOutLog("Error in execution file: " & sExecFile & ", calling function: " & sCallFunction & ", CMD.ERR=" & nErr, ToString)
+         EgtOutLog("Error in execution file: " & sExecFile & ", calling function: " & sCallFunction & ", CMD.ERR=" & nErr.ToString)
+         ' Error in executing file FILENAME
+         Dim MsgBoxError As New EgtMsgBox(m_MainWindow, "", 90259 & " '" & sExecFile & "'.", EgtMsgBox.Buttons.OK, EgtMsgBox.Icons.NULL)
         Return
      End If
   End Sub