مسار قاعدة البيانات

السلام عليكم ورحمة الله وبركاته

جرب هذه الطريقة :

Imports System.Data.OleDb
Public Class Form2
    Dim ff As String = "D:\khodor.accdb"
    Dim tt As String = "D:\ahmed.accdb"
    Dim constr1 As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & ff & ";Persist Security Info=True"
    Dim constr2 As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & tt & ";Persist Security Info=True"
    Dim con1 As New OleDbConnection(constr1)
    Dim con2 As New OleDbConnection(constr2)

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If RadioButton1.Checked = True Then
            con1.Open()
            MsgBox("The ff dataBase is opened successfully")
        ElseIf RadioButton2.Checked = True Then
                con2.Open()
                MsgBox("The tt dataBase is opened successfully")
           

            End If

        con1.Close()
        con2.Close()
    End Sub

السيد الفاضل

لا بد ان يكون  connection   واحد       لان  الاتصال بعد ذلك عبر الفورمات المختلفة يستخدم  نفس  جملة الاتصال مع اختلاف اسم القاعدة

اي  con1   و  con2    لا بد ان يكون اسم واحد

انا عن نفسي  جملة الاتصال صحيحة    ولا ادلري ما السبب   ؟؟؟

لما يتم الاتصال عند كتابة المسار كامل 

وعندما اضع اسم القاعدة في متغير  لا يصل اليها  ؟؟؟؟؟؟

اتمني الوصول الي الهدف 

كيف اضع دالة   داخل الموديول 

نسال  فيها  اذا  كان form20.radiobutton1.checked=true     يكون  المسار     ......1

واذا كان الاخر يكون  المسار   ........ 2

كيف نمرر   المسار الي  الدالة  ؟؟؟   قد يكون هذا حل

try this

ff= Application.StartupPath & "\a1\asd.mdb"

كده حضرتك ثبت اسم القاعدة  والمجلد  

ابغي  تغيير اسم  القاعدة  او  المسار  ؟؟؟؟