احتاج كود تحديث تلقائى

[2000ابوعبدالله]

السلام عليكم

لدى قاعدة بيانات بها نموذجين الاول ادخال بيانات والثانى نموذج بحث

النموذج الاول به زر تحديث يدوى بمعنى لابد من ضغط الز حتى يتم التحديث والا لاتظهر البيانات فى نموذج البحث

المطلوب هو كود تحديث تلقائى دون الحاجة الى ضغط زر التحديث....

تم تعديل يوليو 30, 2022 بواسطه 2000ابوعبدالله

[ابوبسمله]

وعليكم السلام ورحمه الله وبركاته

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

بالتوفيق

[2000ابوعبدالله]

هلا اخى احمد ..صعب ارفاق القاعدة لحجمها الكبير..

وطلبى واضح هو كود يحدث النموذج تلقائيا دون الحاجة الى ضغط زر التحديث 

[Amr Ashraf]

18 دقائق مضت, 2000ابوعبدالله said:

وطلبى واضح هو كود يحدث النموذج تلقائيا دون الحاجة الى ضغط زر التحديث 

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

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

If Me.Dirty Then
    Me.Dirty = False
End If

الكود السابق سيحفظ السجل الحالى عند اجراء تعديلات عليه فقط , ويمكن استخدام ايضاً

DoCmd.RunCommand acCmdSaveRecord

انا اجيب على حسب فهمى وطبعاً الاسهل انك ترفق مثال للنموذجين المطلوبين فقط سيسهل الامر على من يجيبك .. بالتوفيق

 

 

 

[Moosak]

جرب ضع هذا الأمر في حدث بعد التحديث للنموذج الأول :

Private Sub Form_AfterUpdate()
On Error Resume Next
    [Forms]![Form2].Requery
End Sub

 

[2000ابوعبدالله]

تم ارفاق قاعدة البيانات..

للتوضيح اكثر فى نموذج temp اريد عندما اكتب الاسم مثلا او اى حقل مثل المبلغ ان يتم التحديث تلقائى ...دون الحاجة الى الانتقال الى السجل التالى او ضغط زر التحديث 

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

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

 

 

 

asd.rar

[Eng.Qassim]

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

ام سؤالك يخص شيء اخر لم افهمه؟

[2000ابوعبدالله]

اخى Eng.Qassim انا اريد التحديث فى وقته وليس عند الخروج من القاعدة او استخدام زر التحديث  

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

تم تعديل أغسطس 2, 2022 بواسطه 2000ابوعبدالله

[ابوبسمله]

السلام عليكم

مشاركه مع اخوانى واساتذتى جزاهم الله خيرا

وردا على الاخ @2000ابوعبدالله

5 ساعات مضت, 2000ابوعبدالله said:

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

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

عالعموم قمت باضافه الحفظ لزر فتح البحث

وقمت باضافه المرجع الناقص للقاعده لمن اراد

بالتوفيق

 

Desktop.rar

[2000ابوعبدالله]

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

•  

[ابوبسمله]

18 دقائق مضت, 2000ابوعبدالله said:

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

•  

الشكر لله وان شاء الله يساعدك احد اخوه بالمطلوب

بالتوفيق

[ابوبسمله]

وحتى لا اكون ممن كتم علما وننول دعوه صالحه تنفعنا انا واخوتى واساتذتى يوم لا ينفع مال ولا بنون

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

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

وان لم يكن ولديك اوفيس 2003 فادخل على اعدادات الماكرو وخفض الماكرو وشغل النموذج هيشتغل معاك باذن الله تعالى

بالتوفيق

[2000ابوعبدالله]

هلا احمد المحتوى ممكن اللى تقول عليه شريط اصفر  والاوفس عندى 2010

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

[ابوبسمله]

10 ساعات مضت, 2000ابوعبدالله said:

هلا احمد المحتوى ممكن اللى تقول عليه شريط اصفر  والاوفس عندى 2010

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

هلا بيك ابوعبدالله

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

عالعموم قمت باستيراد المثال على قاعده بيانات جديده جربها ان اعطاك نفس الخطأ فجرب تجربه المثالين على جهاز اخر ثم قم بازاله الاوفيس ثم قم بتسطيبه مره اخرى وجرب

بالتوفيق

test.accdb

[2000ابوعبدالله]

شكرا اخى احمد بارك الله فيك..نعم هذا هو المطلوب .

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

[ابوبسمله]

الشكر لله ثم لاخواننا واساتذتنا جزاهم الله عنا كل خير

14 ساعات مضت, 2000ابوعبدالله said:

ماهى الخطوات التى اتبعتها وذلك ليتم تطبيق الحل على القاعدة الاصلية الموجودة لدى...

فهى نفس الخطوات التى شرحتها سابقا عند وضع المثال

في 2‏/8‏/2022 at 21:11, احمد الفلاحجي said:

عالعموم قمت باضافه الحفظ لزر فتح البحث

 

DoCmd.RunCommand acCmdSaveRecord

 

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

بالتوفيق

[2000ابوعبدالله]

2 ساعات مضت, احمد الفلاحجي said:

الشكر لله ثم لاخواننا واساتذتنا جزاهم الله عنا كل خير

فهى نفس الخطوات التى شرحتها سابقا عند وضع المثال

 

DoCmd.RunCommand acCmdSaveRecord

 

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

بالتوفيق

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

[ابوبسمله]

الشكر لله ثم لاخواننا واساتذتنا جزاهم الله عنا كل خير

17 ساعات مضت, 2000ابوعبدالله said:

وصلت المعلومة وبارك الله فيك

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