[djelloul]

مرحبا وصحة فطوركم
لدي مشروع تسيير المبيعات
عملت سلسلة الإتصال بقاعدة البيانات أكسس بواسطة Module أواجه خطأ في مسار سلسلة الإتصال بقاعدة البيانات رغم أنني تأكدت مرارا من صحة المسار إلا أن رسالة الخطا لا تزال تظهر ما العمل أرجوكم

أرفقت مثالا عن المشروع

  Projet VS2010.rar (الحجم : 581.47 ك ب / التحميلات : 119)

[عمار عيثاوي]

اخي الكريم
استخدم هذا الدالة بدال المسار الكامل
"+Source=" + IO.Directory.GetCurrentDirectory
اي انه سوف يتم البحث عن القاعدة في اي مكان تكون القاعدة
ارجو الافادة لان هذا الي فتهمتة من مشكلتك

[aftfm]

متى تظهر رسالة الخطأ
وفي أي فورم تظهر

على العموم جرب هذا


Dim Str As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & _
Application.StartupPath & "\DataDirectory.accdb; Jet OLEDBatabase"
Public Cnn As New OleDbConnection(Str)