diff --git a/MainWindow/MainWindowViewModel.vb b/MainWindow/MainWindowViewModel.vb
index 7737ecb..a0243d1 100644
--- a/MainWindow/MainWindowViewModel.vb
+++ b/MainWindow/MainWindowViewModel.vb
@@ -329,7 +329,11 @@ Namespace EgtCAM5
          m_nDebug = GetPrivateProfileInt(S_GENERAL, K_DEBUG, 0)
          Dim sLogFile As String = m_sTempDir & "\" & GENLOG_FILE_NAME.Replace("#", m_nInstance.ToString())
          Dim sLogMsg As String = "User " & Environment.UserName & "\" & Environment.MachineName & " (" & m_nInstance.ToString() & ")" & vbLf &
-                                 My.Application.Info.Description.ToString() & " ver. " & My.Application.Info.Version.ToString()
+                                 My.Application.Info.Description.ToString() & " ver. " &
+                                 My.Application.Info.Version.Major.ToString() &
+                                 "." & My.Application.Info.Version.Minor.ToString() &
+                                 (ChrW(97 - 1 + My.Application.Info.Version.Build)).ToString() &
+                                 My.Application.Info.Version.Revision.ToString()
          EgtInit(m_nDebug, sLogFile, sLogMsg)
          ' Leggo direttorio dei messaggi (se manca uso direttorio di configurazione)
          Dim sMsgDir As String = String.Empty