Передать строку динамического подключения в другую форму Windows (VB.NET)

Question

Я создаю приложение для Windows, которое требует динамической строки подключения при запуске приложения (пользователь должен предоставить учетные данные БД через форму), После ввода учетных данных подключения пользователь перенаправляется на новую выигрышную форму Все работает нормально, но как я могу пройтимое динамическое соединение с другой формой.

Я пытался сохранить его в переменной приложения, но не смог (думаю, что он доступен только для чтения). Также я попытался сохранить его в реестре, но не могу получить значения.

Есть ли другие варианты?как запись и извлечение ConString в текстовый файл или XML

Спасибо

Answer 1

Вот как вы можете получить и установить значения реестра:

Public Function GetRegistryValue(ByVal KeyName As String, Optional ByVal DefaultValue As Object = Nothing) As Object
        Dim res As Object = Nothing
        Try
            Dim k = My.Computer.Registry.CurrentUser.OpenSubKey("Software\YourAppName", True)
            If k IsNot Nothing Then
                res = k.GetValue(KeyName, DefaultValue)
            Else
                k = My.Computer.Registry.CurrentUser.CreateSubKey("Software\YourAppName")
            End If
            If k IsNot Nothing Then k.Close()
        Catch ' ex As Exception
            'PromptMsg(ex)
        End Try
        Return res
End Function

Public Sub SetRegistryValue(ByVal KeyName As String, ByVal _Value As Object)
        Try
            Dim k = My.Computer.Registry.CurrentUser.OpenSubKey("Software\YourAppName", True)
            If k IsNot Nothing Then
                k.SetValue(KeyName, _Value)
            Else
                k = My.Computer.Registry.CurrentUser.CreateSubKey("Software\YourAppName")
                k.SetValue(KeyName, _Value)
            End If
            If k IsNot Nothing Then k.Close()
        Catch ' ex As Exception
            'PromptMsg(ex)
        End Try
End Sub

Это работает на 100%. Если вы отметите этот ответ как Вправо