ازهر عبد العزيز قام بنشر يونيو 17, 2019 مشاركة قام بنشر يونيو 17, 2019 (معدل) سابقا اعطاني الاخ @ابا جودى نموذج اضعه في قاعدة البيانات لكي امنع الاخرين من استيرادها كان نموذج رائع لكن واجهتني مشكلة وهي عندا اضعة في قاعدة البيانات التي عندي لا استطيع تحويلها الى صيغة (accde) هل هناك حل للمشكلة وهل تم تطوير النموذج اكثر واذا تم ارجو اعطائي النسخة الاحدث وشكرا لكم وان كان لاحدكم طريقة اخرى ارجو مساعدتي تم تعديل يونيو 17, 2019 بواسطه ازهر عبد العزيز 1 رابط هذا التعليق شارك More sharing options...
essam rabea قام بنشر يونيو 17, 2019 مشاركة قام بنشر يونيو 17, 2019 أعتقد أن ابسط طريقة هى إخفاء كائنات قاعدة البيانات التى تريد أن لا يتم إستيرادها 1 رابط هذا التعليق شارك More sharing options...
ابو جودي قام بنشر يونيو 17, 2019 مشاركة قام بنشر يونيو 17, 2019 1 ساعه مضت, ازهر عبد العزيز said: سابقا اعطاني الاخ @ابا جودى نموذج اضعه في قاعدة البيانات لكي امنع الاخرين من استيرادها كان نموذج رائع لكن واجهتني مشكلة وهي عندا اضعة في قاعدة البيانات التي عندي لا استطيع تحويلها الى صيغة (accde) هل هناك حل للمشكلة وهل تم تطوير النموذج اكثر واذا تم ارجو اعطائي النسخة الاحدث وشكرا لكم وان كان لاحدكم طريقة اخرى ارجو مساعدتي والله لا اتذكر ولكن ان قلت انت كذلك فأنت ادرى حالا منى لذلك رد الي بضاعتى لارى ما فيها رابط هذا التعليق شارك More sharing options...
ازهر عبد العزيز قام بنشر يونيو 17, 2019 الكاتب مشاركة قام بنشر يونيو 17, 2019 اخي @essam rabea حتى بعد اخفائها يمكن استيراد البيانات للقاعدة من قاعدة بيانات اخرى وهذة بظاعتكم ردت اليكم الاخ @ابا جودى Admin Utilities.mdb رابط هذا التعليق شارك More sharing options...
essam rabea قام بنشر يونيو 17, 2019 مشاركة قام بنشر يونيو 17, 2019 (معدل) الأخ الفاضل ازهر عبد العزيز فى المرفق .. هل يمكنك استيراد الجداول المخفية ؟ إن كانت الإجابه نعم فأنا لن أفيدك بشيئ وأطمع فى معرفة الطريقة .. وإن كانت لا فحلها بسيط إن شاء الله Tables to hide Unhide.rar تم تعديل يونيو 17, 2019 بواسطه essam rabea رابط هذا التعليق شارك More sharing options...
ازهر عبد العزيز قام بنشر يونيو 17, 2019 الكاتب مشاركة قام بنشر يونيو 17, 2019 (معدل) استاذ @essam rabea لايمكن استيرادها وكانة لايوجد جداول ممكن الطريقة لو تكرمت تم تعديل يونيو 17, 2019 بواسطه ازهر عبد العزيز رابط هذا التعليق شارك More sharing options...
essam rabea قام بنشر يونيو 17, 2019 مشاركة قام بنشر يونيو 17, 2019 (معدل) أستاذنا ازهر عبد العزيز اولا يجب أن تكون الجداول بادئة بـ _tbl حتى لا تضطر الى كتابة أسم كل جدول ضع فى حدث الفورم الرئيسى on Load Dim tdf As TableDef For Each tdf In CurrentDb.TableDefs If tdf.Name Like "tbl*" Then tdf.Attributes = dbHiddenObject End If Next tdf هذا للإخفاء وهذا الكود للإظهار Dim tdf As TableDef For Each tdf In CurrentDb.TableDefs If tdf.Name Like "tbl*" Then tdf.Attributes = 0 End If Next tdf والله الموفق تم تعديل يونيو 17, 2019 بواسطه essam rabea 1 رابط هذا التعليق شارك More sharing options...
ازهر عبد العزيز قام بنشر يونيو 17, 2019 الكاتب مشاركة قام بنشر يونيو 17, 2019 @essam rabea رابط هذا التعليق شارك More sharing options...
ازهر عبد العزيز قام بنشر يونيو 17, 2019 الكاتب مشاركة قام بنشر يونيو 17, 2019 استاذ @essam rabea تمكنت من اظهار النماذج المخفية في المرفق اذي ارسلتة لي لكني لم استطع اخفائها من جديد ممكن المساعدة ان امكن رابط هذا التعليق شارك More sharing options...
الحلبي قام بنشر يونيو 17, 2019 مشاركة قام بنشر يونيو 17, 2019 السلام عليكم ان سمحتوا لي بالمداخله ياريت اعرف في المثال المرسل من الاستاذ @essam rabea كيف اظهار الجداول خصوصا ان الكود السابق يوضع في نموذج طب فين هو النموذج اصلا يرجى التوضيح فنحن في حاجة لماسه لمثل هذا الموضوع او مطلوب من الاستاذ / عصام التوضيح اكثر حتي نتعلم كيفية عمل ذلك رابط هذا التعليق شارك More sharing options...
ابو جودي قام بنشر يونيو 18, 2019 مشاركة قام بنشر يونيو 18, 2019 اعتذر على التأخير انا اسف تم التحويل دبون اى مشاكل اذن المشكله بقاعدتك انت اعم ضغط واصلاح اولا ثم ادخل الى الاكواد ثم للوقوف على الخطأ الموجود بالاكواد عندك ويمنه من التحويل Admin Utilities (1).zip رابط هذا التعليق شارك More sharing options...
الحلبي قام بنشر يونيو 18, 2019 مشاركة قام بنشر يونيو 18, 2019 يرجي التوضيح ياجماعة الخير انا مش فاهم حاجة خالص نأمل في عمل نموذج يخفي الجداول ويظهرها او شرح الامثلة السابقة رابط هذا التعليق شارك More sharing options...
ازهر عبد العزيز قام بنشر يونيو 18, 2019 الكاتب مشاركة قام بنشر يونيو 18, 2019 اخي @حلبي الموضوع بسيط وقد احسن الاستاذة @ابا جودى و @essam rabea في توضيحة والفكرة انك تاخذ احد الامثلة كا مثال الاستاذ عصام وتضع الكود ات عند فتح النموذج فيتم الاخفاء اما مثال الاستاذ ابا جودي تاخذ النموذج وتضعة في قاعدة البيانات لديك ومنه تتحكم في اخفاء واظهار كل شئ رابط هذا التعليق شارك More sharing options...
essam rabea قام بنشر يونيو 18, 2019 مشاركة قام بنشر يونيو 18, 2019 أعتذر عن التأخير الأخ الفاضل ازهر عبد العزيز الكلام كان عن إخفاء الجداول وعدم إستيرادها وليس النماذج أستاذنا حلبي المفروض أن يطبق الكود السابق على النموذج الرئيسى فى حدث عند التحميل حتى بخفى الجداول تلقائيا او نموذج مستقل حسب المرفق. ولكنى لم استطع تطبيقة على جداول مرتبطة بالتوفيق HideUnHide.rar رابط هذا التعليق شارك More sharing options...
ازهر عبد العزيز قام بنشر يونيو 18, 2019 الكاتب مشاركة قام بنشر يونيو 18, 2019 نعم استاذ @essam rabea هذا المقصود لان اهم شئ اخفاء المعلومات المجودة في الجداول وهذا كان قصدي رابط هذا التعليق شارك More sharing options...
الحلبي قام بنشر يونيو 18, 2019 مشاركة قام بنشر يونيو 18, 2019 الاستاذ الفاضل / عصام اشكرك على التوضيح وجزاك الله كل خير الاستاذ الفاضل / ازهر اشكرك وبارك الله فيك رابط هذا التعليق شارك More sharing options...
ازهر عبد العزيز قام بنشر يونيو 18, 2019 الكاتب مشاركة قام بنشر يونيو 18, 2019 استاذ @essam rabea لدي فقط خمس جداول كيف سيكون كتابة كود الاخفاء لها دون تغيير اسمائهن رابط هذا التعليق شارك More sharing options...
عبد اللطيف سلوم قام بنشر يونيو 18, 2019 مشاركة قام بنشر يونيو 18, 2019 21 دقائق مضت, ازهر عبد العزيز said: استاذ @essam rabea لدي فقط خمس جداول كيف سيكون كتابة كود الاخفاء لها دون تغيير اسمائهن Dim tdf As TableDef For Each tdf In CurrentDb.TableDefs If tdf.Name Like "THE_NAME*" Then tdf.Attributes = dbHiddenObject End If Next tdf كرر العملية 5 مرات اكتب اسم الجدول بدل كلمة THE_NAME رابط هذا التعليق شارك More sharing options...
ازهر عبد العزيز قام بنشر يونيو 18, 2019 الكاتب مشاركة قام بنشر يونيو 18, 2019 استاذ @عبد اللطيف سلوم اهلا بك عرفت الطريقة ولكن كان القصد هل يمكن عملها دون تكرار العملية 5 مرات رابط هذا التعليق شارك More sharing options...
عبد اللطيف سلوم قام بنشر يونيو 18, 2019 مشاركة قام بنشر يونيو 18, 2019 1 دقيقه مضت, ازهر عبد العزيز said: استاذ @عبد اللطيف سلوم اهلا بك عرفت الطريقة ولكن كان القصد هل يمكن عملها دون تكرار العملية 5 مرات على حسب اسم الجداول عندك لو كانت تبدأ مثلا باسم جدول .... فيكفي ان تكتب جدول وتضع خلفة نجمه كما في مثال الاخ عصام اما اذا اسماء مختلفة فلا بد من التكرار او تغيير الاسماء رابط هذا التعليق شارك More sharing options...
essam rabea قام بنشر يونيو 18, 2019 مشاركة قام بنشر يونيو 18, 2019 او ممكن تستخدم Or For Each tdf In CurrentDb.TableDefs If (tdf.Name = "اسم الجدول الاول") Or (tdf.Name = "اسم الجدول الثانى") Then tdf.Attributes = dbHiddenObject End If Next tdf 1 1 رابط هذا التعليق شارك More sharing options...
ازهر عبد العزيز قام بنشر يونيو 18, 2019 الكاتب مشاركة قام بنشر يونيو 18, 2019 @essam rabea فعلا معلم رابط هذا التعليق شارك More sharing options...
essam rabea قام بنشر يونيو 18, 2019 مشاركة قام بنشر يونيو 18, 2019 رابط هذا التعليق شارك More sharing options...
essam rabea قام بنشر يونيو 19, 2019 مشاركة قام بنشر يونيو 19, 2019 الإخوة الأفاضل لابد من إلقاء نظرة على هذا الموضوع رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.