diff --git a/OptionsWindow/OptionWindowVM.vb b/OptionsWindow/OptionWindowVM.vb index a1d81d7..6152db3 100644 --- a/OptionsWindow/OptionWindowVM.vb +++ b/OptionsWindow/OptionWindowVM.vb @@ -1810,15 +1810,15 @@ Public Class OptionWindowVM End If End If ' Faccio una copia di backup del Beam corrente - Dim sBackupDir As String = IniFile.m_sBeamDirPath & ".old" + Dim sBackupDir As String = IniFile.m_sBeamNTDirPath & ".old" If My.Computer.FileSystem.DirectoryExists(sBackupDir) Then My.Computer.FileSystem.DeleteDirectory(sBackupDir, FileIO.DeleteDirectoryOption.DeleteAllContents) End If Try - My.Computer.FileSystem.MoveDirectory(IniFile.m_sBeamDirPath, sBackupDir, True) + My.Computer.FileSystem.MoveDirectory(IniFile.m_sBeamNTDirPath, sBackupDir, True) Catch ex As Exception ' Ripristino lo stato originale ed esco - My.Computer.FileSystem.MoveDirectory(sBackupDir, IniFile.m_sBeamDirPath, True) + My.Computer.FileSystem.MoveDirectory(sBackupDir, IniFile.m_sBeamNTDirPath, True) ' L'aggiornamento del modulo "{0}" non è riuscito. - Errore Dim sOut As String = String.Format(EgtMsg(6559), "BeamNT") EgtOutLog(sOut) @@ -1828,7 +1828,7 @@ Public Class OptionWindowVM Return End Try ' Installo il Beam - My.Computer.FileSystem.MoveDirectory(sTempDir, IniFile.m_sBeamDirPath, True) + My.Computer.FileSystem.MoveDirectory(sTempDir, IniFile.m_sBeamNTDirPath, True) ' Il modulo "{0}" è stata aggiornato con successo. - Info Dim sOk As String = String.Format(EgtMsg(6560), "BeamNT") EgtOutLog(sOk)