عدة مشاكل, فيجوال+قاعدة بيانات اكسس.. مع شبكات؟

أخوتي واخواتي ... اعضاء ومشرفي المنتدى

تحية طيبة وبعد ،،،

لدي مشكلة واريد حل لها ممن لديه المعرفة ...

وتتلخص في التالي :

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

ولكن طلب مني ربطها علىشبكة محلية بها عدد 4 اجهزة ، فقمت بتغيير مسار قاعدة البيانات إلى جهاز الخادم ، وهي تعمل الآن ولكن في بعض الاحيان تظهر رسالة تفيد بأن

العملية اوقفت بسبب محاولتك ومستخدم آخر تغيير نفس Microsoft Jet مشغل قاعدة بيانات البيانات وفي نفس الوقت ورقم الخطأ

ٌRun time error 2147467259(80004005 رغم أنني متأكد من أنه لايوجد أي مستخدم آخر يقوم بالعمل على المنظومة .

الرجاء المساعدة وبشكل عاجل

ملاحظة تجدون ادناه كود الربط الذي استخدمه :

Sub Main()
db.Open "provider=microsoft.jet.oledb.4.0;" & "data source=\\pc04\d\database\Directdet.mdb" & ";Jet OLEDB:Database Password=3311;"

Main1.Show
login.Show 1
End Sub

Public Sub center()
If rs.State = adStateOpen Then rs.Close
rs.Open sql, db, adOpenKeyset, adLockOptimistic
End Sub

آية الرحمن