منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : مشكله في ربط الفيجوال بيسك 2019 مع الاكسس 2019
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورحمه الله وبركاته أنا عندي فيجوال بيسك 2019 وكان عندي اوفيس 2007 وكان شغال تمام الربط كان شغال يعني  وجربت 2010 و 2013 أما 2019 مش عايز يربط نهائي ايه الحل بعد اذنكم
Dim conn As New OleDbConnection("provider=Microsoft.Ace.OLEDB.12.0;" & "data source=" & Application.StartupPath & "\database.accdb")

هذا كود الاتصال بين الفجوال2019 وبين الاكسس ولكني افضل ان الاكسس يكون فوق 2010 جربت هذا الكود بين 2010 اكسس وبين الفجوال2019
هو حضرتك الكود ده شغال لحد اصدار2013 من الاوفيس فقط اما 2019 مش شغال
الكود التالي شغال مع كل اصدارات اوفيس :


كود :
       Dim cn As New OleDb.OleDbConnection
       cn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & Application.StartupPath & "\UsersData.mdb;Jet OLEDB:Database Password=,"
       cn.Open()


والكود التالي شغال مع الاصدارات 2016 - 2019 :
كود :
       Dim cn As New OleDb.OleDbConnection
       cn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.16.0;Data Source=" & Application.StartupPath & "\UsersData.mdb;Jet OLEDB:Database Password=,"
       cn.Open()


واذا ما اشتغل معاك -
عيد تثبيت الفيجول استديو من جديد..
.