يوسف مؤذن قام بنشر سبتمبر 14, 2018 مشاركة قام بنشر سبتمبر 14, 2018 السلام عيكلم و رحمة الله و بركاته لو سمحت .. اجب على الصورة المرفقة من فضلك 1 رابط هذا التعليق شارك More sharing options...
Hamdi Edlbi-khalf قام بنشر سبتمبر 14, 2018 الكاتب مشاركة قام بنشر سبتمبر 14, 2018 و عليكم السلام و رحمة الله و بركاته في السجل الأول ١/٧/٢٠١٨ في السجل الثاني فارغ رابط هذا التعليق شارك More sharing options...
Shivan Rekany قام بنشر سبتمبر 14, 2018 مشاركة قام بنشر سبتمبر 14, 2018 في ١٣/٩/٢٠١٨ at 16:48, Khalf said: كتابة تاريخ بداية المدة الجديدة أن يتم تحديث نهاية فترة الإيجار السابقة ببداية فترة الإيجار الجديدة - 1 . وصلت لي الفكرة باقي هذا شيء فقط عند كتابة تاريخ بداية جديدة ... من اي نموذج تكتب بداية جديدة ؟ ممكن توضيح هذا ايضا واسف تعبت معي بالشروحات 1 رابط هذا التعليق شارك More sharing options...
Hamdi Edlbi-khalf قام بنشر سبتمبر 14, 2018 الكاتب مشاركة قام بنشر سبتمبر 14, 2018 1 دقيقه مضت, Shivan Rekany said: واسف تعبت معي بالشروحات انا الأسف ... و اعتذر مجدداً ابدا من النموذج الرئيسي و اكتب به البيانات التي ارغب بها ثم اضغط زر اضافة سجلات فيضيف سجلات على عدد أعضاء مجلس الادارة الموجود في حقل ضمن النموذج الرئيسي و بما أن النموذجين الرئيسي و الفرعي مرتبطان بمجموعة من الحقول .و منها حقل الانتخاب و المناصب فتظهر قيمة حقل الانتخاب و المناصب في النموذج الفرعي و في حقل مربع القائمة في النموذج الرئيسي يظهر تاريخ الانتخاب و المناصب فيه اضافة الو تاريخ الانتخابات و المناصب السابق و الذي عند الضغط عليه يظهر الانتخابات السابقة شكراً مرة أخرى و بارك الله بك . رابط هذا التعليق شارك More sharing options...
Shivan Rekany قام بنشر سبتمبر 14, 2018 مشاركة قام بنشر سبتمبر 14, 2018 (معدل) القي نظرتا الى استعلام q1 و q2 هذه هو الاستعلام الاول SELECT [قاعدة البيانات].[اسم المنظمة], tblm.الجمعية, tblm.المعرف, tblm.الاسم, tblm.المناصب, tblm.الانتخابات, tblm.الانتهاء, tblm.links, tblm.[المناصب الإدارية] FROM [قاعدة البيانات] INNER JOIN tblm ON ([قاعدة البيانات].ID = tblm.links) AND ([قاعدة البيانات].[آخر انتخابات هيئة عامة] = tblm.الانتخابات) AND ([قاعدة البيانات].[آخر توزيع مناصب] = tblm.المناصب) AND ([قاعدة البيانات].[اسم المنظمة] = tblm.الجمعية); وعلي اساس هذا الاستعلام قمنا بعمل هذا استعلام التحديث UPDATE q1 SET q1.الانتهاء = DateAdd("d",-1,DMax("[المناصب]","tblm","[tblm]![الجمعية]='" & [الجمعية] & "'")); والنتيجة كما مبينة في الصور لكن بعد انا لا اعرف جيدا شروط العمل و كيفية العمل لكي نوصل الى نتائج احسن برنامج_(1)_-_Copy_-_Copy.rar تم تعديل سبتمبر 14, 2018 بواسطه Shivan Rekany 1 رابط هذا التعليق شارك More sharing options...
Hamdi Edlbi-khalf قام بنشر سبتمبر 14, 2018 الكاتب مشاركة قام بنشر سبتمبر 14, 2018 السلام عليكم في الواقع لم يعمل لدي الملف كما هو مبين عندكم في الصورة المرفقة مع الأسف .... بقيت المشكلة القديمة و التحديث الخاطئ!!! أولا - كونه لا يوجد في القاعدة الاستعلام query1 قمت بتغيير الاسم إلى q1 ثانياً - بقيت مشكلة التحديث الخاطئ كما هي ... مع الأسف الشديد ! رابط هذا التعليق شارك More sharing options...
Hamdi Edlbi-khalf قام بنشر سبتمبر 14, 2018 الكاتب مشاركة قام بنشر سبتمبر 14, 2018 (معدل) الاستعلام تضمن شرطاً على أساس حقل الانتخابات بينما يجب أن يكون على أساس المناصب ... بعد التعديلات عمل لدي الاستعلام ... شكراً لك أستاذ شيفان !! جهد رائع جزاك الله كل خير إلا أنه عند إضافة حقل جديد في النموذج الفرعي فقد عاودت المشكلة للظهور مرة أخرى .... تم تعديل سبتمبر 14, 2018 بواسطه Khalf رابط هذا التعليق شارك More sharing options...
Hamdi Edlbi-khalf قام بنشر سبتمبر 14, 2018 الكاتب مشاركة قام بنشر سبتمبر 14, 2018 (معدل) أمر آخر أود أن أضيفه : إن فكرة الاستعلام الذي تفضلت به تحتاج إلى أن أكون قد اخترت الانتخابات التي أرغب بتحديثها . و هو ما لجأت إليه معتمداً على الطريقة التي قدمتها لي سابقاً باستخدام الفيجوال بيزيك .. و هي ذات طريقة الأخ العزيز @AlwaZeeR أن أنسخ قيمة حقل في نموذج إلى حقل آخر مع تحريك الشاشة إلى أسفل ... و لكن لكي يكون الأمر ناجحاً في نموذج فرعي فقد سبقت الأمر بـ ON ERROR RESUME NEXT سأطبق الطريقة على قاعدة البيانات الأساسيةو أخبركم بالنتيجة مبدئياً . لا زالت بعد السجلات تبدي نفس المشكلة!!! تم تعديل سبتمبر 14, 2018 بواسطه Khalf رابط هذا التعليق شارك More sharing options...
Shivan Rekany قام بنشر سبتمبر 14, 2018 مشاركة قام بنشر سبتمبر 14, 2018 58 دقائق مضت, Khalf said: سأطبق الطريقة على قاعدة البيانات الأساسيةو أخبركم بالنتيجة مبدئياً . لا زالت بعد السجلات تبدي نفس المشكلة ما رأيك ان تعمل قاعدة مصغرة مرتبة وتكتب عليه خطوات وشروط حسب الحالة لكي نعمل تجربات الحلول لكي يسهل ونعرف جيدا عن العمل اعرف هذا صعب عليك لكن هكذا سيكون احسن باذن الله تقبل تحياتي رابط هذا التعليق شارك More sharing options...
Hamdi Edlbi-khalf قام بنشر سبتمبر 14, 2018 الكاتب مشاركة قام بنشر سبتمبر 14, 2018 الان, Shivan Rekany said: ما رأيك ان تعمل قاعدة مصغرة مرتبة وتكتب عليه خطوات وشروط حسب الحالة لكي نعمل تجربات الحلول لكي يسهل ونعرف جيدا عن العمل اعرف هذا صعب عليك لكن هكذا سيكون احسن باذن الله تقبل تحياتي الحمد لله من وحي طريقتك وصلت أخيراً إلى الحل ........ أستاذ شيفان المشكلة التي كانت عقبة أمام إيصال الفكرة هي تعقيدات قانونية في إعداد البرنامج و ليست البرمجة في ذاتها. و لا أخفيك أستاذي أني توقعت ألا يحصل هذا الموضوع على اهتمام أعضاء بارزين و خاضة أن الأمر صار أشبه بأحجية عشوائية بلا إجابة منطقية و كل ذلك لأنني لا أعرف كيف أشرح القكرة قانونياً كي أصل إلى حل برمجي ... و ما أوصلني إلى ذلك علوق النتائج في الاستعلام و الذي أدخلني و أدخل من أراد المساعدة في متاهات ... فخلال عملي وصلت إلى أفكار برمجية مقبولة تحقق المطلوب,,,,,, إلى أن وصلت إلى تلك النقطة ... لقد كان علوق النتائج في الاستعلام ما أبحث عن إجابة عنه ، فقد بدا محبطاً للغاية ,,,, بلا سبب,,,,, بلا تعليل ,,,, و كاد ذلك أن يهدم العمل برمته و أعتقد أن المسألة في أصلها ثعرة برمجية ليس من حل لها إلا بالالتفاف عليها . بعد هذه التجربة بات الأمر واضحاً ، فكم من برنامج تم إعداده من شركات برمجة لم ينجح كون الموضوع فيه ما فيه من خصوصية و خفايا قانونية و تعقيدات و الآن أمهلني حتى أعد قاعدة واضحة - على ما اعتقد 😅 - لما توصلت إليه و بقي لدي سؤال عن نفس الموضوع بحاجة إلى مساعدتكم به .. كل الشكر لك كل الشكر لمن قدم المساعدة .... 1 رابط هذا التعليق شارك More sharing options...
Hamdi Edlbi-khalf قام بنشر سبتمبر 16, 2018 الكاتب مشاركة قام بنشر سبتمبر 16, 2018 (معدل) السلام عليكم @Shivan Rekany أعتذر على التأخر بوضع الحل الذي توصلت له .... http://www.mediafire.com/file/9l4l446f4g4jlnx/%u0628%u0631%u0646%u0627%u0645%u062C_%281%29_-_Copy_-_Copy.accdb/file و لكن هناك طلب في حال تم فإن العمل سيغدو مكتملاً إن شاء الله .. و هو اختيار السطر السابق me.listbox.selected (j-1) من المربع غير المنضم عند الضغط على الزر الأحمر ثم إجراء عملية التحديث مما يمكنني من القيام بعملية التحديث على السجلات المطلوبة . حاولت باستخدام الكود السابق بعد تعريف المتغير j و وضع الدالة if إلا أنه لم يعمل ... شكراً لك أخي على مساعدتك القيمة .... تم تعديل سبتمبر 16, 2018 بواسطه Khalf رابط هذا التعليق شارك More sharing options...
Shivan Rekany قام بنشر سبتمبر 17, 2018 مشاركة قام بنشر سبتمبر 17, 2018 14 ساعات مضت, Khalf said: أعتذر على التأخر بوضع الحل الذي توصلت له .... وانا اعتذر منك ... منذ البارحة عطل جهاز اللابتوب الشخصي ... انتظرني ان شاء الله بعد اصلح الجهاز راح اكون معك 1 رابط هذا التعليق شارك More sharing options...
Hamdi Edlbi-khalf قام بنشر سبتمبر 19, 2018 الكاتب مشاركة قام بنشر سبتمبر 19, 2018 (معدل) السلام عليكم أستاذ @Shivan Rekany لقد توصلت إلى الأمر التالي ME.CB100.SELECTED(1) = true 'اختيار السطر الأول ME.CB100.SELECTED( CB100.LISTCOUNT--2) = true IF ME.CB100.LISTCOUNT = 0 or IF ME.CB100.LISTCOUNT = 1 then me.cb100.setfocus else ME.CB100.SELECTED( CB100.LISTCOUNT-2)= true END IF إضغط و إسحب للتحريك تم تعديل سبتمبر 19, 2018 بواسطه Khalf 1 رابط هذا التعليق شارك More sharing options...
Hamdi Edlbi-khalf قام بنشر سبتمبر 19, 2018 الكاتب مشاركة قام بنشر سبتمبر 19, 2018 الحمد لله الذي بنعمته تتم الصالحات لقد تم الأمر على خير ما يرام و بطريقة مركبة شغلت فيها زراً عن طريق زر آخر .. شكراً أستاذي @Shivan Rekany 1 رابط هذا التعليق شارك More sharing options...
Shivan Rekany قام بنشر سبتمبر 19, 2018 مشاركة قام بنشر سبتمبر 19, 2018 (معدل) 1 ساعه مضت, Khalf said: لقد تم الأمر على خير ما يرام و بطريقة مركبة شغلت فيها زراً عن طريق زر آخر .. السلام عليكم ورحمة الله عطل جهازي قبل كم يوم والبارحة باليل تم تصليحه ... واليوم انا عملت له تحديثات وفي العصر اقدرت ان افتح الموقع واليوم انا نزلت المرفق لكن بعد ما اشتغلت عليه لكن الحمد لله لانك وصلت للمطلوب لكن لماذا بطريقة مركبة ؟ ماذا تريد ان يعمل لك كل واحد منهم ؟ تم تعديل سبتمبر 19, 2018 بواسطه Shivan Rekany 1 رابط هذا التعليق شارك More sharing options...
خربطة قام بنشر سبتمبر 20, 2018 مشاركة قام بنشر سبتمبر 20, 2018 (معدل) شكراً للجميع تم تعديل سبتمبر 20, 2018 بواسطه خربطة 1 رابط هذا التعليق شارك More sharing options...
Hamdi Edlbi-khalf قام بنشر سبتمبر 21, 2018 الكاتب مشاركة قام بنشر سبتمبر 21, 2018 (معدل) السلام عليكم أستاذ @Shivan Rekany لقد تم الأمر و الحمد لله ، و جزاك الله كل خير على عونك و صبرك و لطفك في المرفق وضعت زراً باللون الأحمر يقوم بإنجاز تحديث زر الانتهاء باستخدام حلقة تكرارية تنتقل بين أسطر مربع القائمة و لكن مع انتقاله بين السجلات لا يقوم بتحديث الحقل المطلوب بخلاف لو كان التحديث دون حلقة تكرارية الأمر الآخر أنني اضطررت لعمل زر ضمن النموذج الفرعي لتنفيذ المطلوب فهل يمكن تنفيذ العملية مباشرة دون استخدام زر في النموذج الفرعي http://www.mediafire.com/file/3412of2a2jzru5y/%25D8%25A7%25D9%2584%25D8%25A8%25D8%25B1%25D9%2586%25D8%25A7%25D9%2585%25D8%25AC.accdb/file تم تعديل سبتمبر 21, 2018 بواسطه Khalf رابط هذا التعليق شارك More sharing options...
Hamdi Edlbi-khalf قام بنشر سبتمبر 23, 2018 الكاتب مشاركة قام بنشر سبتمبر 23, 2018 (معدل) هناك أمر آخر ... هل يؤدي استخدام النماذج الفرعية ضمن البرنامج إلى الإبطاء من أدائه في حال استخدم على شبكة داخلية ؟ مع أنه لا خطط مبدئياً لاستخدامه ضمن الشبكة . شكراً أستاذ @Shivan Rekany بانتظار إبداعاتك .. تم تعديل سبتمبر 23, 2018 بواسطه Khalf رابط هذا التعليق شارك More sharing options...
Shivan Rekany قام بنشر سبتمبر 23, 2018 مشاركة قام بنشر سبتمبر 23, 2018 في ٢١/٩/٢٠١٨ at 22:56, Khalf said: في المرفق وضعت زراً باللون الأحمر يقوم بإنجاز تحديث زر الانتهاء باستخدام حلقة تكرارية تنتقل بين أسطر مربع القائمة و لكن مع انتقاله بين السجلات لا يقوم بتحديث الحقل المطلوب بخلاف لو كان التحديث دون حلقة تكرارية الأمر الآخر أنني اضطررت لعمل زر ضمن النموذج الفرعي لتنفيذ المطلوب فهل يمكن تنفيذ العملية مباشرة دون استخدام زر في النموذج الفرعي الان تقدر تحذف زر في نموذج الفرعي الزر الاحمر يقوم بعمل زر النموذج الفرعي البرنامج.rar 2 رابط هذا التعليق شارك More sharing options...
Hamdi Edlbi-khalf قام بنشر سبتمبر 23, 2018 الكاتب مشاركة قام بنشر سبتمبر 23, 2018 شكراً أستاذ @Shivan Rekany جزاك الله كل خير فعلاً مبدع .. بارك الله لك و بعلمك حاولت تنفيذ الفكرة و لكن لم أصب كبدها لنقص حاد بالمعلومات و عدم معرفة مفتاح البحث المناسب ... حتى مددت لي أيادي العون أستاذ @Shivan Rekany مع الأخوة في هذا المنتدى و خصوصاً .. @AlwaZeeR @kaser906 لقد كانت رحلة طويلة ... استغرقت مني أكثر من أربعة أشهر من البحث و التجريب و السؤال يومياً ...حتى تبلورت طريقة العمل و كيفية تنفيذها و لولا مشاركتكم و عونكم كانت غير ممكنة الآن صرت من محبي Recordset و recordsetclone ههههههه فلولاهما لما تمكنت من الوصول إلى هذه النقطة بعد أن فشل الاستعلام ... لن تصدق الآن أني أشعر و كأني لاجئ يهرب من الشرطة المقدونية و اليونانية و العصابات الأفغانية ... و الآن وصل لحدود ألمانيا ..... شكراً لكم و ألف شكر .. لكم السلام في الدنيا و في الحياة الأُخرى.. 1 رابط هذا التعليق شارك 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.