اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

الردود الموصى بها

تحديد عدد السجلات المراد عرضها تباعا فى نموذج مستمر

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

ولازلت افكر بكيفة الحل :blink:

تم حل المشكلة بفضل الله وتم تحديث المرفق

 

عدد السجلات للنموذج المستمر v.2.mdb

تم تعديل بواسطه ابا جودى
مشكلة بالمرفق
  • Like 2
  • Thanks 2
رابط هذا التعليق
شارك

15 دقائق مضت, أحمد الفلاحجى said:

جزاك الله خيرا اخى واستاذى محمد @ابا جودى :fff:

صادفتنى الان مشكلة ولازلت افكر فى حل

لو تم مسح سجلات يحدث خلل :blink: :wallbash: :wallbash:

 

اعتذر لاساتذتى لم انتبه لتلك المشكلة قبل المشاركة

رابط هذا التعليق
شارك

2 دقائق مضت, ابا جودى said:

صادفتنى الان مشكلة ولازلت افكر فى حل

لو تم مسح سجلات يحدث خلل :blink: :wallbash: :wallbash:

 

اعتذر لاساتذتى لم انتبه لتلك المشكلة قبل المشاركة

وعلام الاعتذار اخى واستاذى محمد فكلنا نخطىء ومن اخطائنا نتعلم الكثير بارك الله فيك :fff:

وماهى المشكله التى ظهرت معك ؟ ان كانت مشكله اعاده الترقيم فهذه امرها سهل فيمكن اعاده الترقيم مره اخرى ام هناك مشكله اخرى لم الاحظها ؟

رابط هذا التعليق
شارك

اخى واستاذى العزيز محمد @ابا جودى

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

Private Sub Form_Open(Cancel As Integer)
 strSql = "SELECT TOP  10 tblData.ID, tblData.[NO], tblData.Locatin, tblData.SecName, tblData.DepName, tblData.RegDate FROM tblData;"
 Me.RecordSource = strSql
 Call RecordCount
 Call RecordCount
End Sub

 

  • Like 1
  • Haha 1
رابط هذا التعليق
شارك

تم بفضل الله تعالى التغلب على المشكلة وتم حلها بحمد الله وتم تعديل المرفق

 

 عدد السجلات للنموذج المستمر v.2.mdb

  • Like 1
رابط هذا التعليق
شارك

13 دقائق مضت, ابا جودى said:

تم بفضل الله تعالى التغلب على المشكلة وتم حلها بحمد الله وتم تعديل المرفق

 

  عدد السجلات للنموذج المستمر v.2.mdb 484 kB · 1 تنزيلات

الحمدلله الذى بنعمته تتم الصالحات

احسنت بارك الله فيك وجزاك الله كل خير @ابا جودى :fff: :clapping:

تم تعديل بواسطه أحمد الفلاحجى
  • Like 1
  • Thanks 1
رابط هذا التعليق
شارك

طيب ممكن نقول ان الموضوع ده انفراد وحصري لمنتدياتنا منتديات اوفيسنا:rol:

التصميم والأفكار والاكواد من بنات افكارى:dance1: 

ام سبقنا اليه غيرنا :eek2:

  • Like 1
  • Thanks 1
رابط هذا التعليق
شارك

استاذى ومعلمى الفاضل / مروض الاكسس / @ابا جودى

انت دائما منفرد وحصرى بأفكارك الجميلة 

ومش عارف ليه تحرمنا من ابداعاتك وتغيب عنا لعل يكون السبب خير ـ

كيف صحتك الأن يارب تكون بخير ويزيدك الله من الصحة ويبارك لك فى علمك

استاذى / @أحمد الفلاحجى

يعجز لسانى عن اى كلمات لما تقدمه لمساعدة الاخرين

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

  • Thanks 2
رابط هذا التعليق
شارك

4 ساعات مضت, حلبي said:

استاذى ومعلمى الفاضل / مروض الاكسس / @ابا جودى

انت دائما منفرد وحصرى بأفكارك الجميلة 

ومش عارف ليه تحرمنا من ابداعاتك وتغيب عنا لعل يكون السبب خير ـ

كيف صحتك الأن يارب تكون بخير ويزيدك الله من الصحة ويبارك لك فى علمك

استاذى / @أحمد الفلاحجى

يعجز لسانى عن اى كلمات لما تقدمه لمساعدة الاخرين

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

السلام عليكم ورحمة الله

ازيك يا دكتور والله وحشتوني جدا واشتاقت نفسي لكم 🌹 جدا جدا جدا

جزاكم الله خيرا

رابط هذا التعليق
شارك

اخينا وحبيبنا ابا جودي

لاشك ان لكم لمسات جميله 

ولكن انا لم افهم المشكله اولا ؟ فحسب فهمي عرض عشر سجلات في نموذج مستمر والتنقل كل عشره ؟ ولكن ماسيرة الحذف هنا ؟

ويمكن لو انزلت المرفق ان افهم ولكن عذرا ليس لدي كمبيوتر حاليا ولعله غدا باذن الله 

ولكنني تشوقت ان اعرف ونستفيد من بعض وتقبل تحياتي

  • Thanks 1
رابط هذا التعليق
شارك

استاذى الجليل ومعلمى القدير الاستاذ @رمهان🌹

اشتاقت نفسي للقياكم كثيرا

انا باول الموضوع وضعت مرفق كمثال بالافكار التى دارت براسي وليس سؤال 

ولكن مع التجربة وجدت خلل بحدث عند مسح اى سجلات من الجدول

هذا لاننى اعتمدت على حقل الترقيم التلقائي 

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

وبفضل الله تعالى توصلت الى الحل وقمت باستبدال المرفق المعطوب بالاصدار المعدل

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

رابط هذا التعليق
شارك

47 دقائق مضت, jjafferr said:

السلام عليكم 🙂

 

واذا عندي معيار في استعلام النموذج ؟

 

جعفر

وعليكم السلام ورحمة الله وبركاته:fff::biggrin:

استاذى الجليل ومعلمى القدير و والدى الحبيب 

اذا عندنا معيا فى استعلام النموذج نضيفه بالكود عادى

 

رابط هذا التعليق
شارك

9 دقائق مضت, ابا جودى said:

اذا عندنا معيا فى استعلام النموذج نضيفه بالكود عادى

هل العمل الذي تقوم به هو لإثبات انه ممكن (Proof of Concept) 🙂

 

او حتى يستفيد منه الجميع ، المبتدئ والمحترف 😁

 

جعفر

  • Thanks 1
رابط هذا التعليق
شارك

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

اى ان الاساس فيما اقدمه هو

حتى يستفيد منه الجميع ، المبتدئ والمحترف 😁

ولكن هذه الافكار خطرت ببالي بسبب سؤال 

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

ولما فوجئت بالخلل من المرفق الاول الذى قمت باستبداله

احببت ان يتطلع على اساتذتى الكرام حتى استفيد من تعليقاتهم وافكارهم واطروحاتهم

 

تم تعديل بواسطه ابا جودى
رابط هذا التعليق
شارك

طيب يا استاذى الجليل ومعلمي القدير و والدى الحبيب استاذ @jjafferr 🌹

هل افهم من رد حضرتك ان هذه الطريقة معقدة ولن تفيد الجميع 

وان كانت كذلك هل بمكن تبسيطها ام لا :rol:

رابط هذا التعليق
شارك

اخي @ابا جودى

حملت المرفق بجهاز غير معرب فلم استطع تجربة المرفق بالشكل الصحيح

ولكن يبدو ان هناك استعلام غير موجود 

واحتاج افهم هل الهدف هو تصفح عدد محدد من السجلات في النموذج المستمر .. اي على شكل صفحات ؟ وهنا من يتحكم في عدد السجلات لكل صفحة( لكل نقرة زر الصفحة التالية) ؟ وكيف؟

ام ان الهدف شي اخر ؟؟؟؟؟ 

تحياتي 

  • Like 1
رابط هذا التعليق
شارك

1 دقيقه مضت, رمهان said:

اخي @ابا جودى

حملت المرفق بجهاز غير معرب فلم استطع تجربة المرفق بالشكل الصحيح

ولكن يبدو ان هناك استعلام غير موجود 

واحتاج افهم هل الهدف هو تصفح عدد محدد من السجلات في النموذج المستمر .. اي على شكل صفحات ؟ وهنا من يتحكم في عدد السجلات لكل صفحة( لكل نقرة زر الصفحة التالية) ؟ وكيف؟

ام ان الهدف شي اخر ؟؟؟؟؟ 

تحياتي 

اهلا استاذى الجليل ومعلمى القدير الاستاذ @رمهان🌹

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

سوف اتيكم  بالاكواد والشرح سيدى

ولكن اعطنى دقائق انا اتصفح من الجوال لا يوجد انترنت فى الحاسوب

امهلنى لانقل ما اريد من ملفات الى الجوال اولا

رابط هذا التعليق
شارك

تمام ياحبيب الجميع

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

sendkeys "{pgdn}"

او كود رمهاني التالي تنقل للتالي 

DoCmd.GoToPage 1, , Me.InsideHeight - Me.FormHeader.Height

والتنقل لسابق واجب منزلي ابا جودي

هذا وانا جربت على مثال عندي غير مثالك 

وتقبل تحياتي وان شاء الله انه المطلوب ان احسنت الفهم

تم تعديل بواسطه رمهان
ارتفاع وليس عرض النموذج
  • Like 1
  • Haha 1
رابط هذا التعليق
شارك

اتفضل استاذى اسف انا نسيت وكتبت عربي فى المرفق السابق داخل محرر الاكواد

تم تعديل هذا المرفق

 

 

عدد السجلات للنموذج المستمر v.2 (1).mdb

5 دقائق مضت, رمهان said:

تمام ياحبيب الجميع

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


sendkeys "{pgdn}"

او كود رمهاني التالي تنقل للتالي 


DoCmd.GoToPage 1, , Me.InsideHeight - Me.FormHeader.Height

والتنقل لسابق واجب منزلي ابا جودي

هذا وانا جربت على مثال عندي غير مثالك 

وتقبل تحياتي وان شاء الله انه المطلوب ان احسنت الفهم

نعم سيدى ومعلمى ولكن لى هنا سؤال

الن تفرق هنا حجم واختلاف مقاس الشاشة من جهاز لاخر

رابط هذا التعليق
شارك

المرفق يعطيني خطأ بان هناك استعلام اسمه qryJudy وانا مش لاقيه

عالعموم شوف المشاركة السابقة وان شاء الله مفيده

تحياتي

5 دقائق مضت, ابا جودى said:

نعم سيدى ومعلمى ولكن لى هنا سؤال

الن تفرق هنا حجم واختلاف مقاس الشاشة من جهاز لاخر

حبيبي واخي اباجودي

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

تحياتي

  • Haha 1
رابط هذا التعليق
شارك

سوف اقوم بالتطبيق الان كما تفضلتم

وعلى كل هذه هى جملة الاستعلام التى استخدمتها

SELECT qryJudy.ID, * FROM (SELECT TOP 10 tblData.ID, tblData.[NO], tblData.Locatin, tblData.SecName, tblData.DepName, tblData.RegDate, Format(DCount("ID","tblData","ID <=" & [ID])) AS JudyID FROM tblData WHERE (((Format(DCount("ID","tblData","ID <=" & [ID])))<11)) ORDER BY tblData.ID DESC)  AS qryJudy ORDER BY qryJudy.ID;

 

رابط هذا التعليق
شارك

5 دقائق مضت, ابا جودى said:

سوف اقوم بالتطبيق الان كما تفضلتم

وعلى كل هذه هى جملة الاستعلام التى استخدمتها


SELECT qryJudy.ID, * FROM (SELECT TOP 10 tblData.ID, tblData.[NO], tblData.Locatin, tblData.SecName, tblData.DepName, tblData.RegDate, Format(DCount("ID","tblData","ID <=" & [ID])) AS JudyID FROM tblData WHERE (((Format(DCount("ID","tblData","ID <=" & [ID])))<11)) ORDER BY tblData.ID DESC)  AS qryJudy ORDER BY qryJudy.ID;

 

حبيبي واخي

اتفقنا انت تتكرم بالتطبيق

تحياتي

تم تعديل بواسطه رمهان
رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • اضف...

Important Information