Я пытаюсь создать приложение формы Windows в vb.net, которое должно работать с конкретной пользовательской базой данных, что означает, что пользователь создает базу данных и дает ей собственное имя, после чего система импортирует мой файл базы данных и создает из него таблицы, а затем создает файл конфигурации, который он использует для подключения.
Я до сих пор создал форму, которую пользователь будет заполнять с сохранением настроек базы данных, и они будут сохранены в параметрах параметров приложения, подобных этому
Private Sub Save()
My.Settings.MServer = TxtServer.Text
My.Settings.MDbUser = TxtDbUname.Text
My.Settings.MDbPass = TxtDbPwd.Text
My.Settings.MDb = TxtDb.Text
My.Settings.Save()
MessageBox.Show("Dtabase settings saved correctly", "Database settings")
My.Settings.Reload()
Application.Restart()
End Sub
Проблема заключается в том, что, поставив это в разделе настроек в меню основной формы, он создает уязвимость для системы, поскольку ее можно изменить любым, кто получает доступ к компьютеру, на котором он установлен.
Поэтому я хотел бы спросить
Спасибо
Попробуйте создать переменную системных настроек, в которой пользователь установил ее значение, затем создайте форму, из которой пользователь будет вводить значения базы данных, после этого на код, загружающий вашу основную форму или даже регистрационную форму, создайте оператор if, чтобы проверить, пользовательские настройки установлены иначе загружают форму, чтобы пользователь мог ввести и сохранить их следующим образом:
Определение параметров приложения
Затем добавьте этот код перед загрузкой логина/основной формы
if My.Settings.MServer = String.Empty AndAlso
My.Settings.MDbUser = String.Empty AndAlso
My.Settings.MDbPass = String.Empty AndAlso
My.Settings.MDb = String.Empty Then
MySettingsForm.Show()
Else
'Load the next part either the login or main form'
End If
В форме Mydbsettings добавьте этот код под кнопкой сохранения onclick для сохранения настроек
My.Settings.MServer = TxtServer.Text
My.Settings.MDbUser = TxtDbUname.Text
My.Settings.MDbPass = TxtDbPwd.Text
My.Settings.MDb = TxtDb.Text
My.Settings.Save()
MessageBox.Show("Database settings saved correctly", "Database settings")
My.Settings.Reload()
Application.Restart()