diff --git a/Form1.vb b/Form1.vb
index 35adea3..7f45b5a 100644
--- a/Form1.vb
+++ b/Form1.vb
@@ -118,7 +118,11 @@ Public Class Form1
       m_nDebug = GetPrivateProfileInt(S_GENERAL, K_DEBUG, 0, m_sIniFile)
       Dim sLogFile As String = m_sTempDir & "\" & GENLOG_FILE_NAME.Replace("#", m_nInstance.ToString())
       Dim sLogMsg As String = "User " & SystemInformation.UserName & "\" & SystemInformation.ComputerName & " (" & GetInstance() & ")" & 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