اخفاء جدول في قاعدة خارجية

[محمد القدسي]

السلام عليكم 

ما هو الكود لاخفاء جدول موجود في قاعدة خارجية

[ابو جودي]

انصحك بعدم البحث لانك ستجد ذلك الكود وتلك الطريقة

ولكن اخفاء الكائنات تؤدى الى عطب قاعدة البيانات

[محمد القدسي]

استاذي ابا جودي

القاعدة الخلفية التي اعمل عليها الجداول مخفية لها سنوات والحمدلله ما حصل شي للان

[محمد القدسي]

up

[محمد القدسي]

up

[ابو جودي]

اتفضل

 

Admin Utilities.mdb

[محمد القدسي]

اشكرك استاذي ابا جودي 

ولاكن طلبي اخفاء جدول في قاعدة خارجية 

وليس في نفس القاعدة

[ابو جودي]

انقل المجل للقاعدة الخارجية وقم باخفاء الجداول ثم امسح المجلد

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

[ابو جودي]

ونصيحة لوجه الله تعالى

اقراء هذا الموضوع بعناية

 

[محمد القدسي]

اشكرك استاذي ابا جودي

ولاكن طلبي اخفاء جداول ليست مرتبطة وانما جداول القاعدة الخلفية

ويكون عن طريق الكود

لانه احيانا لا استطيع ادخل للقاعدة الخلفية امام المستخدمين

[Gamal.Saad]

اعمل connect  مع القاعدة الخلفية  ومرره للمتغير db:

    Dim db As DAO.Database
    Set db = DAO.DBEngine.OpenDatabase("مسار_القاعدة", False, False)

اخفي الجدول المطلوب بدلالة اسمه :

    db.TableDefs("اسم_الجدول").Attributes = dbHiddenObject    ' لاظهار الجدول اكتب = 0

ويمكن تطوير الكود باضافة كلمة مرور فتح القاعدة اذا كانت محمية بكلمة مرور  وذلك في السطر الثاني بعد كلمة false .

[محمد القدسي]

اشكرك استاذي جمال

اشتغل الكود بنجاح