Как загрузить все My.Settings в txt и выгрузить - Visual Basic .NET

Узнай цену своей работы

Формулировка задачи:

Добрый день, Господа! Увидел у Памирыча на сайте такую фичу.
Возник вопрос. Как можно стянуть все настройки в тхт, и как их потом от туда достать. Например что бы после переустановки приложения, можно было указав путь, вставить старые настройки. Допустим пишем в файл.
Имеем файл типа. Put1= loginBox=True userName=test МЕСТО={X=147,Y=206} name4= name3= topmost1=True Put4= userPass=1 Size={Width=445, Height=333} name2= name1= МЕСТО2={X=1267,Y=84} Put2= Put3= Как выгрузить эти данные в прогу обратно? Что интересно, пустые значения не имеют даже пробела. Как их считать.... П.С. ну еще я понимаю что не обязательно писать Даже name. Тогда еще легче, просто перебирая индекс, подписывать значения. Но если настроек много, тогда осложняется правка txt в ручную потому что не видно какое значение к какой настройке. Мб записывать с разделителем, но с двумерными массивами я не дружу(

Решение задачи: «Как загрузить все My.Settings в txt и выгрузить»

textual
Листинг программы
Public Class Form1
    Dim configfile As String = Configuration.ConfigurationManager.OpenExeConfiguration(Configuration.ConfigurationUserLevel.PerUserRoamingAndLocal).FilePath
    Dim MyFile As String = Environment.GetFolderPath(Environment.SpecialFolder.DesktopDirectory) & "\BackUpSettings.config"
    'Восстановить настройки
    Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
        IO.File.Copy(MyFile, configfile, True)
        My.Settings.Reload()
        MsgBox("Загружен новый файл настроек.")
    End Sub
 
    'Сделать бэкап настроек
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        IO.File.Copy(configfile, Environment.GetFolderPath(Environment.SpecialFolder.DesktopDirectory) & "\BackUpSettings.config", True)
        MsgBox("На рабочем столе создан бэкап файла настроек")
    End Sub
 
    Private Sub Button3_Click(sender As System.Object, e As System.EventArgs) Handles Button3.Click
        Process.Start("notepad", configfile)
    End Sub
End Class

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

10   голосов , оценка 3.6 из 5
Похожие ответы