كود حفظ القيم الجديدة في القائمة listbox تلقائياً بدون ظهور رسالة حفظ أكسس

[qathi]

أخواني الكرام .. 

هل يوجد كود حفظ القيم الجديدة في القائمة listbox تلقائياً بدون ظهور رسالة حفظ أكسس

مرفق الصورة والملف

 

مرفق الملف:

Database1.accdbFetching info...

[ابو جودي]

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

ولكن دعنا نحاول الوصول الى مبتغانا عن طريق اخر  ( طريق رأس الرجاء الصالح )

Database1 (1).accdbFetching info...

تم تعديل مايو 23, 2019 بواسطه ابا جودى

[عبد اللطيف سلوم]

  في 23‏/5‏/2019 at 13:57, qathi said:

أخواني الكرام .. 

هل يوجد كود حفظ القيم الجديدة في القائمة listbox تلقائياً بدون ظهور رسالة حفظ أكسس

مرفق الصورة والملف

 

مرفق الملف:

Database1.accdb 456 \u0643\u064a\u0644\u0648 \u0628\u0627\u064a\u062a · 4 downloads

Expand  

تفضل

Database1.accdbFetching info...

[ابو جودي]

  في 23‏/5‏/2019 at 15:12, عبد اللطيف سلوم said:

تفضل

Database1.accdb 780 \u0643\u064a\u0644\u0648 \u0628\u0627\u064a\u062a · 0 downloads

Expand  

ممكن حضرتك تتكرم بالشرح 

[عبد اللطيف سلوم]

  في 23‏/5‏/2019 at 15:32, ابا جودى said:

ممكن حضرتك تتكرم بالشرح 

Expand  

الشرح بالصور المرفقة

[ابو جودي]

  في 23‏/5‏/2019 at 15:37, عبد اللطيف سلوم said:

الشرح بالصور المرفقة

Expand  

كل الشكـــــــــــــر والتقديــــــــــــــــــــر سيدى 

[عبد اللطيف سلوم]

  في 23‏/5‏/2019 at 15:42, ابا جودى said:

كل الشكـــــــــــــر والتقديــــــــــــــــــــر سيدى 

Expand  

انا تلاميذ بمدرستك اخونا الكبير @ابا جودى

[ابو جودي]

  في 23‏/5‏/2019 at 15:44, عبد اللطيف سلوم said:

انا تلاميذ بمدرستك اخونا الكبير @ابا جودى

Expand  

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

[qathi]

شكراً لسرعه ردودكم اخواني الاكارم .. @ابا جودى و @عبد اللطيف سلوم

بارك الله فيك 

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

 

[عبد اللطيف سلوم]

  في 23‏/5‏/2019 at 19:10, qathi said:

شكراً لسرعه ردودكم اخواني الاكارم .. @ابا جودى و @عبد اللطيف سلوم

بارك الله فيك 

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

 

Expand  

اكبس على نسخ الى الحافظة

وجرب  ان شاء الله يكون شغال تمام

[qathi]

استاذنا @عبد اللطيف سلوم  كيف الغي الرسالة ؟؟

تم تعديل مايو 23, 2019 بواسطه qathi

[عبد اللطيف سلوم]

  في 23‏/5‏/2019 at 19:15, qathi said:

استاذنا @عبد اللطيف سلوم  كيف الغي الرسالة ؟؟

Expand  

جرب هذه القاعدة 

عندي ما تظهر أي رسائل 

Database1.accdbFetching info...

[kanory]

بعد اذنك أخي عبداللطيف

  في 23‏/5‏/2019 at 19:15, qathi said:

استاذنا @عبد اللطيف سلوم  كيف الغي الرسالة ؟؟

Expand  

ضع هذا الكود قبل كود الحدث لديك

DoCmd.RunCommand acCmdSaveRecord

 

[عبد اللطيف سلوم]

  في 23‏/5‏/2019 at 19:50, kanory said:

بعد اذنك أخي عبداللطيف

ضع هذا الكود قبل كود الحدث لديك

DoCmd.RunCommand acCmdSaveRecord

 

Expand  

اعطاني رسالة خطأ

[kanory]

يصبح الكود بهذه الصورة :

On Error GoTo Err:
DoCmd.RunCommand acCmdSaveRecord
[Forms]![SandExpense_F]![ExpenseDate_Sub].[Form]![notes] = Me.notes2
Me.ExpenseDate_Sub.SetFocus
DoCmd.GoToRecord , , acNewRec
[ExpenseDate_Sub]![Amount2].SetFocus
Exit Sub
Err:
MsgBox Error$

 

kan2.accdbFetching info...

[qathi]

أشكر أخي @kanory على ردك وحلك للمشكلة 

والمعذرة لتاخر ردي لأنشغالي .. وللتجربة

 

 أستاذنا @عبد اللطيف سلوم لم انتبه لطريقة الحل الا الآن عند التجربة .. 

في الواقع أستخدم أكثر من قائمة ListBox في أدراج المصروفات هل يوجد طريقة أفضل من السابقة في التعامل مع القوائم أكثر

أكرر شكري لك أخي @ابا جودى .. وأستاذنا @عبد اللطيف سلوم  أخي @kanory 

 

مرفق الملف مع عدة قوائم .. اتمنى المساعدة في ذلك

D3.accdbFetching info...

[qathi]

للرفع ..

[رمهان]

  في 23‏/5‏/2019 at 13:57, qathi said:

أخواني الكرام .. 

هل يوجد كود حفظ القيم الجديدة في القائمة listbox تلقائياً بدون ظهور رسالة حفظ أكسس

مرفق الصورة والملف

 

مرفق الملف:

Database1.accdbFetching info...

Expand  

في حدث on paint  لجزء التفصيل اكتب

docmd.save

بالتوفيق

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

[عبد اللطيف سلوم]

  في 26‏/5‏/2019 at 11:54, رمهان said:

عندما تحول الى accde 

Expand  

ما الفائدة من التحويل الى accde ؟؟

 

[kanory]

  في 26‏/5‏/2019 at 13:49, عبد اللطيف سلوم said:

ما الفائدة من التحويل الى accde ؟؟

 

Expand  

حماية الأكواد ....

والنماذج و التقارير من العبث أو معرفة الاكواد الموجوده بها

[qathi]

  في 26‏/5‏/2019 at 11:54, رمهان said:

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

Expand  

شكراً لك لتنبيهي بذلك أستاذي الغالي @رمهان 

الحمدلله .. أختصرت علي الوقت والتجربة .. 

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

[qathi]

للرفع ...

[رمهان]

اعتقد لا بد من الجداول

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

@أبو إبراهيم الغامدي

تحياتي

 

[qathi]

أستاذي الغالي @رمهان لا أحب أن اثقل عليك هل بالامكان أدراج مثال .. لأني لاعرف الطريقه لذلك 

  في 27‏/5‏/2019 at 18:34, رمهان said:

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

Expand  

أو هل ترى أني أنتظر رد @أبو إبراهيم الغامدي  ؟ كما اشرت له

تم تعديل مايو 27, 2019 بواسطه qathi

[رمهان]

سارفع مثال خلال اليومين الجايه ان شاء الله

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

بالتوفيق