[ابراهيم ايبو]

السلام عليكم اخي خالد
من الصورة حملة الاتصال فيها خطأ اكتبها وفق احد الشكلين التاليين:
هكذا

كود :

   Dim con As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\SADANY.accdb")

او هكذا

كود :

    Dim con As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=SADANY.accdb")