كيف احدد مسار قاعدة البيانات في متغير عبر حقل لاكثر من قاعدة

مساء الورود

لدي برنامج ولنفترض ان لدي 10 نسخ احتياطية ولا اريد تغيير الاسم كل مرة للاسم الاصلي وهو المسار الثابت للبرامج المعتادة، ولكن اريد المستخدم ان يحدد القاعدة التي يريد قبل دخول البرنامج

وهذه محاولتي

الكود الذي وضعت به التكست بكس

Public connsss As New SqlConnection("Data Source=.\SQLEXPRESS;	 AttachDbFilename=" + Me.TextBox1.Text + ";Integrated Security=True;Connect Timeout=30;User Instance=True")

Imports System.Data.SqlClient

Public Class ChangeDatabase

	Public dsss As New DataSet
	Public dsRosesss As New DataSet
	Public dataStrsss As String
	Public connsss As New SqlConnection("Data Source=.\SQLEXPRESS;	 AttachDbFilename=" + Me.TextBox1.Text + ";Integrated Security=True;Connect Timeout=30;User Instance=True")
	Public SQLstrsss As String
	Public SQLstr2sss As String

	Function connesss()
		Try

			connsss.Open()
			SQLstrsss = "Select * from Login"
			Dim myCommands As New SqlCommand(SQLstrsss, connsss)
			Dim DataAdapter1s As New SqlDataAdapter(myCommands)
			DataAdapter1s.Fill(dsss)

			Dim v As New MDIParent1
			v.Show()
			Me.Hide()
			connsss.Close()
		Catch ex As Exception
			MsgBox(ex.Message)
			MsgBox("Sorry Connection to Database Failed!")
		End Try
		Return 0
	End Function

	Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
		dataStrsss = Me.TextBox1.Text()
		Call connesss()
	End Sub
End Class

تحياتي وكل عام والجميع بألف خير

دمتم بود وسلام

:wub: