Как заменить источник данных для подключения к базе данных текстом?
Я создаю программное обеспечение для баз данных, где я хочу дать людям выбор, где разместить базу данных (например, центральное расположение nas или сервер), чтобы иметь программное обеспечение на 2 или более компьютерах.
Поэтому я сделал код для выбора местоположения базы данных в начальной форме запуска.
Для этого код:
System.Data.OleDb Public Class LoginScreen 'DEEL 1: HIER KOMT DATABASE CODE Private Sub Loginscreen_load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 'TODO: This line of code loads data into the 'PatientendatabaseDataSet1.tbl_users' table. You can move, or remove it, as needed. pnlLoginPanel.Visible = False End Sub Private Sub btnChoose_Click(sender As Object, e As EventArgs) Handles btnChoose.Click Dim strtext As String OpenFileDialog1.Filter = "Database Files | *.mdb" OpenFileDialog1.InitialDirectory = "F:\GoogleDrive\EINDWERK VBNET" OpenFileDialog1.Title = "Choose your Database" OpenFileDialog1.ShowDialog() strtext = OpenFileDialog1.FileName txtDatabaselocationshow.Text = strtext End Sub Private Sub btnDBConnect_Click(sender As Object, e As EventArgs) Handles btnDBConnect.Click If txtDatabaselocationshow.Text = "" Then MessageBox.Show("Please choose a database!") chkRememberDB.Checked = False Else pnlLoginPanel.Visible = True End If End Sub Private Sub chkRememberDB_CheckedChanged(sender As Object, e As EventArgs) Handles chkRememberDB.CheckedChanged If chkRememberDB.Checked = True Then txtDatabaselocationshow.ReadOnly = True Else txtDatabaselocationshow.ReadOnly = False End If End Sub
поэтому, как только я нажму кнопку "Подключиться" в форме, я должен подключиться к базе данных.
В будущих формах в моем программном обеспечении есть ли способ заменить "фактическое местоположение" строкой , отображаемой в выбранном поле текстового поля?
Что я уже пробовал:
так что вместо этого
Provider=Microsoft.ACE.OLEDB.12.0;Data Source="F:\GoogleDrive\EINDWERK VBNET\PatientenDatabase.accdb"
он может показать что-то вроде этого?
Using conn As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=strtext")