وضع قيمة استعلام بالفورم

[زياد الحسناوي]

السلام عليكم ارجو من الاساتذة الافاضل مساعدتي في التالي

وضعت بالفورم text38

اريد ان يكون مصدر بياناته ليس الجدول الرئيسي وانما قيمة موجودة في استعلام ؟ 

هل توجد طريقة ؟ استخدمت الدالة dlookup

ولكن لم تنجح (وضعتها في Control Source)

[ابوخليل]

عليكم السلام

طريقتك صحيحة 100%

اكتب الكود هنا  لفحصه وتصحيحه

[زياد الحسناوي]

  في 14‏/12‏/2018 at 09:48, ابوخليل said:

عليكم السلام

طريقتك صحيحة 100%

اكتب الكود هنا  لفحصه وتصحيحه

Expand  

 Dlookup ([اسم الحقل];اسم الكويري)

[غريب طرابلس]

طريقتك صحيحة

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

هدا هو الكود اكتبه بنفس الطريقة DLookUp("[اسم الحقل]";"الاستعلام")

[زياد الحسناوي]

  في 14‏/12‏/2018 at 11:00, غريب طرابلس said:

طريقتك صحيحة

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

هدا هو الكود اكتبه بنفس الطريقة DLookUp("[اسم الحقل]";"الاستعلام")

Expand  

تمام المشكلة كانت بالبرنامج 

غلقته و فتحته رجع اشتغل طبيعي 

[زياد الحسناوي]

  في 14‏/12‏/2018 at 09:48, ابوخليل said:

عليكم السلام

طريقتك صحيحة 100%

اكتب الكود هنا  لفحصه وتصحيحه

Expand  

 

  في 14‏/12‏/2018 at 11:00, غريب طرابلس said:

طريقتك صحيحة

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

هدا هو الكود اكتبه بنفس الطريقة DLookUp("[اسم الحقل]";"الاستعلام")

Expand  

عند وضع الكود 

والانتقال من موظف،الى اخر 

القيم الموجود في التيكست لا تتغير تبقى ثابتة للجميع

بالرغم من تغيرها بالاستعلام 

تم وضع كود ع التيكست docmd.requary

ولم تنفع وتم،اضافتها ع زر 🔘 السابق والتالي

ونفس الشي

[زياد الحسناوي]

 

 

 

[ابوخليل]

جرب التنشيط بهذه الطريقة :

Private Sub Form_Current()
text1.requary
End Sub

على اعتبار text1   هو الحقل الهدف

[زياد الحسناوي]

  في 15‏/12‏/2018 at 08:56, ابوخليل said:

جرب التنشيط بهذه الطريقة :

Private Sub Form_Current()
text1.requary
End Sub

على اعتبار text1   هو الحقل الهدف

Expand  

جربت ما نفعت

تم تعديل ديسمبر 15, 2018 بواسطه zYo

[qathi]

  في 15‏/12‏/2018 at 09:41, zYo said:

جربت ما نفعت

Expand  

جرب

Private Sub Form_Current()
Text1 = Null
End Sub

 

[زياد الحسناوي]

  في 15‏/12‏/2018 at 15:31, qathi said:

جرب

Private Sub Form_Current()
Text1 = Null
End Sub

 

Expand  

ينطيني مشكلة بالكود ويحدده باللون الاصفر

[77061]

السلام عليكم 

اريد كود ينسخ بيانات من جدول ويحطها في جدول اخر بنفس الحقول

 

[ابوخليل]

  اقتباس

جربت ما نفعت

Expand  

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

[زياد الحسناوي]

  في 15‏/12‏/2018 at 18:14, ابوخليل said:

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

Expand  

هذا رابط الملف التجريبي 

https://www.mediafire.com/file/rm8ky6i6r8adlmi/000_-_Copy.accdb/file

تم تعديل ديسمبر 15, 2018 بواسطه zYo

[غريب طرابلس]

جرب اخي الكريم 

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

ولم تضف شرط 

فلهاد السبب  لم تتغير الارقام مع تغيير السجلات 

ووافينا بنتيجة هل هو المطلوب 

000 - Copy.rarFetching info...

تم تعديل ديسمبر 15, 2018 بواسطه غريب طرابلس

[زياد الحسناوي]

  في 15‏/12‏/2018 at 20:10, غريب طرابلس said:

جرب اخي الكريم 

ووافينا بنتيجة هل هو المطلوب 

000 - Copy.rarFetching info...

Expand  

عاشت ايدك استاذي 

هذا المطلوب بالضبط 

 

 

في هذا الموضوع مشكلة اخرى لنفس الملف يرجى للاطلاع عليها

 

تم تعديل ديسمبر 15, 2018 بواسطه zYo

[غريب طرابلس]

الحمد لله

ونشكر استادنا الشيخ ابو خليل

على مد يد العون للجميع

دائما نراه سباق للاجابة

بارك الله فيه واطال الله عمره

[زياد الحسناوي]

  في 15‏/12‏/2018 at 20:30, غريب طرابلس said:

الحمد لله

ونشكر استادنا الشيخ ابو خليل

على مد يد العون للجميع

دائما نراه سباق للاجابة

بارك الله فيه واطال الله عمره

Expand  

اشكر جميع الاساتذة الي قدموا المساعدة

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

ولهذا اعتمدت ع الصور 

 

اشكركم مرة ثانية ع رحابة صدركم