ابو جودي

up

شوف اخى الحبيب التعديل لا علاقة له بهذه المشكلة من الاساس ولكن اذا فتحت التصميم تبعك انظر الى مصدر بيانات التيكست بوكس تبع رفم النموذج انت جعلته =[Forms]![عملية انتاج]![رقم النموذج] ولماذا اصلا لم تجعله رقم النمودح جرب

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

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

الجزء الأول لم افهمه اصلا ماذا تقصد من هذا السطر عند فتح العملية يظهر خطأ عند رمزالنموذج وذلك بعد ان وضعت العلامة ( ' ) عند فتح النموذج في الوحدة النمطية اما بخصوص هذا الجزء هل يمكن تغيير اتجاه عرض القائمة من اليسار لليمين هذا سؤال آخر لو تكرمت افتح له موضوع جديد حفظا على قوانين تنظيم المشاركات داخل المنتدى شكرا

بصراحة لم اجد على الانترنت حل لتلك المشكلة ولا حتى تجاربى افادت بحلها كما تريد انت سيدى على الرغم من انها كانت تجارب كثيرة جدا جدا ولكن بعد بحث ومحاولات مستميته للوصول الى النتيجة التى ترجوها بدون التفكير بمنطقية فى طلبكم فشلت ولا اعتقد انه يوجد حل لذلك ولكن بعد التدبر اصلا والتفكير بروية ليس هذا حل للمشكلة اصلا فحتما المصمم وقت اضافته الى تلك المكتبات لم يقم بذلك هباءا لذلك تتعطل الوظائف البرمجية بسبب فقدانها فإزالتها اصلا لن يفيد بش ولكن توصلت لاحد الحلين 1- هند فتح القاعدة كود بنموذج الدهول يقوم بالبحث اولا داخل المكتبات ان وجدت فلا بأس ويستكمل الدخول الى باقى النماذج وان وجدت مكتبات مفقودة يظهر رسالة باسم كل والمكتبات المفقودة ويغلق القاعدة. 2- حمل المكتبات الهامة داخل القاعدة وفى كل مرة عتد فتخ القاعدة يتم عمل دونلود من القاعدة الى مجلد القاعدة ومن ثم يتم اضافتها الى القاعدة انتظر ردك لتخيرتى ماذا تريد

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

الاستاذان الجليلان استاذ @essam rabea والاستاذ @Barna كل الشكر والتقدير لكما ولكن اصلا القاعدة تعطينى عند الفتح unrecognized format فضلا وكرما فلتعلموا اننى من عشاق الجكمة التى يقول لا تعطنى سمكة ولكم علمنى كيف اقوم باصطيادها

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

اتفضل Test.accdb

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

انا جمعت كل ما احبه ان يكون هنا

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

هو سبقنى

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

هذان كل منهما فى سطر 1- انشاء جدول 2- انشاء الحقول داخل خذا الجدول 3-النموذج

ركز شوية يا استاذى الكريم هذا معناه مشكلة بالمكتبات توجه الى محرر الاكواد ومنها اختر قائمة tools ثن اختر reference انظر الى المكتبة التى بها مشكله قم بازالتها ثم ارجاعها مره اخرى بما يتناسب مع اصدار الاوفيس لديك وتكلمنا عن ذلك اكثر من مره

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

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

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

هههههههههه اسف كنت مستعجل علشان الصلاة اتفضل Undelete Tables and Queries.mdb

اتفضل تقدر طبعا تكمل انت المشوار انا نفذت لك الكود على فتح نموذج عملية انتاج فتح النموذج بنافذة اخرى.accdb

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

عيونى استأذنك بس بعد الصلاة ان شاء الله اقوم بالتعديلات المناسبة ابشـر

بص انا هقول لك ليه فكرت بالموديول لان كلمة انثى تكررت مثلا اربع مرات كان ممكن ما اعمل الموديول ومثلا فى كل زر امر اقوم بعمل الاتى مثلا الكود الاتى Private Sub Command10_Click() Form.FilterOn = False Form.Filter = "[stage]='ابتدائي'And [sex]='انثى'" Form.FilterOn = True DoCmd.SetOrderBy "swname ASC" End Sub ببساطة وبدون موديول ممكن يكون كده Private Sub Command10_Click() Dim StrSex As String dim StrStage As String StrSex = ChrW("1575") & ChrW("1606") & ChrW("1579") & ChrW("1609") StrStage = ChrW("1575") & ChrW("1576") & ChrW("1578") & ChrW("1583") & ChrW("1575") & ChrW("1574") & ChrW("1610") Form.FilterOn = False 'Form.Filter = "[stage]='ابتدائي'And [sex]='انثى'" Form.Filter = "[stage]='" & StrStage & "' And [sex]='" & StrSex & "'" Form.FilterOn = True DoCmd.SetOrderBy "swname ASC" End Sub بس لما لاقيت الكلام تكرر اكتر من مره كان الاسهل اكتب السطر الكبير مره واحدة فى موديول واستدعيه بكلمه واحده بس