الكشف عن مسار قاعدة البيانات الحالية والجداول المرتبطة بها

سلام اخى الكريم

وشكراً على أفكارك المتميزة

المثال جميل ولكن لى سؤال..

هل يقبل الأكسس فى ربط الجداول المرتبطة Current Path?

أى بمعنى إمكانية الربط التلقائى للجداول المرتبطة بغض النظر عن المسار ولكن مادامت هذه الجداول بجوار ملف التنفيذ (الواجهة)

مثل جملة Connection String المستخدمة فى بيئة الدوت نت ... يتم الربط من خلال Current Path

وشكراً

هانى عوض كتب:

هل يقبل الأكسس فى ربط الجداول المرتبطة Current Path?

أى بمعنى إمكانية الربط التلقائى للجداول المرتبطة بغض النظر عن المسار ولكن مادامت هذه الجداول بجوار ملف التنفيذ (الواجهة)

مثل جملة Connection String المستخدمة فى بيئة الدوت نت ... يتم الربط من خلال Current Path

وشكراً

أهلا أستاذي الكريم هاني ، الصراحة أفضالك كثيرة علي وعلى أهل هذا المنتدى بما اتحفتنا من مشاركات وافكار جميلة وشرف لي مروركم واطرائكم على الموضوع ..

أما السؤال فيمكن ذلك وقد كانت لي محاولة بنفس السؤال ولا أذكر الرابط مع الأخ الفاضل at_azizz وكان بيننا هذا المثال وهو يربط الجداول بشكل آلي بعد أن يبحث عنها بنفس المجلد وفي الكود شرح الطريقة ..

شكرا لمرورك وجزاك الله كل خير ..

تم اضافة المطلوب بالمشاركة الأولى ..

تحياتي ..

azizi-up.rar

دائما تأتينا بكل ما هو رائع و جميل أستاذنا أبو عدنان

بارك الله فيك و فى مالك و ولدك

لكن ملاحظة بسيطة

حقل ال pass يحتاج ان يكون حجمه اكبر من ذلك لان مسار القاعدة من المحتمل ان يكون اكبر من 50

و ذلك فى الجدول MSys_Pass

بارك الله بك أخي أبو يوسف وبارك الله بأهلك وصحتك وشكرا لك على هذا التشجيع ، وما هو رائع وجميل هو مشاركاتك وتفاعلك مع الجميع ..

وأعتقد استاذ كبيرة على شوي وأخي أقرب الى القلب :)

ملاحظتك في محلها فيمكن المسار يكون حجمه أكبر من 50 ، شكرا لك ولا نستغني عن ملاحظاتك القيمة ..

تحياتي ..

بارك الله فيك وجزاك الله خير اخي الفاضل ابو عدنان

موضوع رائع وموفق

وفقك الله ورعاك ونفع بعلمك

احترامي وتقديري

شكراً أخى الكريم

فأنا مثلك مدين بالكثير لهذا المنتدى

أعجبتنى طريقتك فى محاولة الربط التلقائى.. ولكن للأسف هناك أمكانيات إذا أردنا أن نطبقها بالأكسس نأخذ الكثير من الأكواد لتنفيذها .. غير أن إمكانيات الأكسس تعتبر محدودة بالنسبة لحجم التطور البرمجى الحاصل فى هذا الوقت

على سبيل المثال (وليس تقليلاً من الأكسيس "فهو أساس عملى.. ووظيفتى..")

الكود التالى طريقة الربط ولكن بـ C#

        public dbCon()
        {
            cnn = new OleDbConnection(@"Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+System.Windows.Forms.Application.StartupPath+"\\DatabaseName.mdb;Persist Security Info=False");
            dpt = new OleDbDataAdapter("", cnn);
            cmd.Connection = cnn;
        }

كما زكرت من قبل هذا ليس تقليلاً بإمكانيات الأكسيس

ولكن عملى بلغة السى شارب أعطانى مزيداً من الفهم المنطقى لتنفيذ الأكواد البرمجية بالأكسيس "فهناك تشابة كبير إلى حدما".. وهذا لا يتنافى مع حبى للأكسيس فهو "الحب الأول... "

ملخص الموضوع

الوصول للهدف بأقصر الطرق هو اقرب وأصح للواقع

شكراً على مجهودكم المبذول من أجل رفعة المنتدى ومساعدة الأعضاء

بالتوفيق

الاستاذ الفاضل

مع ان معلوماتى فى السى شارب تعتبر صفر

و لكن واضح من الكود انه يقوم بعمل connection

و هذا موجود بالاكسس و لا يوجد مشكلة

و اذا اردت ربط الجداول بكود بسيط

فهذا ايضا متاح

Dim tdf As DAO.TableDef

   For Each tdf In CurrentDb().TableDefs
        If (tdf.Attributes And dbAttachedTable) = dbAttachedTable Then

            tdf.Connect = ";DATABASE=" & CurrentProject.path & "\data.mdb"
            tdf.RefreshLink
        End If
    Next

الله يبارك فيك أخي هاني وجزاك الله كل خير ..

شكرا على المداخلة أخي أبو يوسف وجزاك الله خير ..

at_aziz كتب:

بارك الله فيك وجزاك الله خير اخي الفاضل ابو عدنان

موضوع رائع وموفق

وفقك الله ورعاك ونفع بعلمك

احترامي وتقديري

اشكرك أخي الفاضل at-aziz على مرورك الكريم وجزاك الله كل خير فأنت صاحب الفكرة بالأصل ..

تحياتي لك ..

جزاك الله خيرا أخى ابو عدنان

تمنياتى لك بالتوفيق الدائم

وتستاهل +1000000

أخوك أحمد

الاخ أبو يوسف شكر اللله لك لضيق الوقت لم اجرب الكود ...ولي استفسار ياغالي:

هل يربط لي جميع الجداول اذا كان عندي قاعدة للربط بها اكثر من 40 جدول!!!