اذهب الي المحتوي
أوفيسنا

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

قام بنشر (معدل)

الأستاذ  @رمهان

أنا جهزت مرفقا لتطبيق ما تفضلت به

و فيه بعض المحاولات

أرجو الاطلاع و التعديل

و المطلوب هو

أحدث تاريخين من حقل السنة و هو رقمى

لكل موظف

ثم تحديث الجدول الأول t1

بهذه النتائج

testo.rar

المطلوب أعلى قيمة  و السابقة لها فى حقل السنة

أين تنفذ هذه الصيغة السابقة

أنا استخرجتها فى استعلام

بعد ذلك

كيف نحدث الجدول الأصلى

ليتك تطبق لنا المعادلة على الملف المرفق

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

تم تعديل بواسطه عبد الفتاح كيرة
قام بنشر (معدل)
في ٢٤‏/٥‏/٢٠١٧ at 03:14, رمهان said:

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

هل لانها حصلت اكثر اجابه ؟

صحيح

في ٢٤‏/٥‏/٢٠١٧ at 03:14, رمهان said:

فاذا كان صحيحا فنحن لم نستفد من التحديثات الاخيره

في ٢٤‏/٥‏/٢٠١٧ at 03:14, رمهان said:

وحاولت اقرا الموضوع زي اول ولكن تشتت شويه فلا اعلم ماهي المشاركة الاولى تاريخيا ووقتا ؟

امامك هذه الطريقة

 

11.PNG.0ec552facbae64cad5fd44232fa0d7df.PNG

لكن يجب كل موضوع تعمله فرز حسب تاريخ

ياليت ان كان هناك اختيار الفرز الافتراضي لكل عضو
 

في ٢٤‏/٥‏/٢٠١٧ at 11:22, عبد الفتاح كيرة said:

و يا ليت أجد تفسيرا للصورتين السابقتين

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

 

انا استخدمت نفس ترتيب المكتبات لكن غيرت الكود الى DAO.RECORDSET كما تفضل به استاذنا الحبيب رمهان

12.PNG.3a9ac9f4aa82fdd3e7c6dcad142cbd59.PNG

وتم التحديث السجلات

 

تم تعديل بواسطه Shivan Rekany
قام بنشر
14 دقائق مضت, عبد الفتاح كيرة said:

قمت بعمل التحديث عن طريق الكود

لكن هناك مشكلة فى تحديث السجل الحامس

testo.rar

استخدم nz مع الكود

i = Nz(DMax("yy", "t2", "empid=" & x), 0)
ii = Nz(DMax("yy", "t2", "empid=" & x & "and [yy]<>" & i), 0)

r = Nz(DLookup("taqq", "t2", "yy=" & i & " and empid=" & x), " ")
rr = Nz(DLookup("taqq", "t2", "yy=" & ii & "and empid=" & x), " ")

واشتغل 100%

  • Like 1
قام بنشر
5 دقائق مضت, عبد الفتاح كيرة said:

شيفان المحترم

هذا سؤال

أم خبر سار؟

استاذي الحبيب

لان حضرتك قلت 

24 دقائق مضت, عبد الفتاح كيرة said:

لكن هناك مشكلة فى تحديث السجل الحامس

انا قلت

10 دقائق مضت, Shivan Rekany said:

استخدم nz مع الكود


i = Nz(DMax("yy", "t2", "empid=" & x), 0)
ii = Nz(DMax("yy", "t2", "empid=" & x & "and [yy]<>" & i), 0)

r = Nz(DLookup("taqq", "t2", "yy=" & i & " and empid=" & x), " ")
rr = Nz(DLookup("taqq", "t2", "yy=" & ii & "and empid=" & x), " ")

 

ولان قبل ان انشر انا عملت التجربة

انا قلت

10 دقائق مضت, Shivan Rekany said:

واشتغل 100%

هههه شكرا لك استاذي الحبيب :smile:

  • Like 1
قام بنشر

تم المراد من رب العباد

جزيل الشكر لك أخى الحبيب 

@Shivan Rekany

لابد من الاستبدال ب صفر فى الأول i

لأن قيمة الصفر سيبنى عليها قيمة rr

زاد الموضوع ثراء بالفكرة العبقرية للأستاذ @رمهان

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

هذا التحديث بالكود

فهل يمكن التحديث بالاستعلام مع استخدام نفس الفكرة؟

جربته لم يفلح

رسالة خطأ اختلاف النوع

مع أنها نفس الحقول التى بالكود

جزيل الشكر لكم جميعا

  • Like 1
قام بنشر (معدل)
7 دقائق مضت, عبد الفتاح كيرة said:

فهل يمكن التحديث بالاستعلام مع استخدام نفس الفكرة؟

نعم قبل قليل انا عملت ونجحت

انتظرني راح ارفق لك القاعدة

عندك استعلام q1

واليك هذا الاستعلام للتحديث

UPDATE t1 INNER JOIN q1 ON t1.id = q1.id SET t1.t3am = [q1]![lasttaqd], t1.taq = [q1]![taqlast], t1.t3am2 = [q1]![befortaqd], t1.taq2 = [q1]![taqbefor];

اليك القاعدة

testo.rar

تم تعديل بواسطه Shivan Rekany
  • Like 2
قام بنشر
10 دقائق مضت, Shivan Rekany said:

نعم قبل قليل انا عملت ونجحت

انتظرني راح ارفق لك القاعدة

عندك استعلام q1

واليك هذا الاستعلام للتحديث



 

ممتاز جدا

جزاك الله خيرا و بارك فيك

بساطة و سهولة متناهية

أقترح تثبيت هذا الموضوع فقد زاد قيمة و به من كنوز الأكسيس الكثير

 

  • Like 1
قام بنشر (معدل)
23 دقائق مضت, عبد الفتاح كيرة said:

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

بنفس الطريقة استاذنا @رمهان

القي نظرتا الى هذا لثلاث سجلات

القي نظرتا الى الاستعلام q3record و استعلام التحديث باسم tahdith3record

testo.rar

تم تعديل بواسطه Shivan Rekany
  • Like 2
قام بنشر
24 دقائق مضت, عبد الفتاح كيرة said:

هذه بركات شهر الصيام

علوم متتابعة

وفقك الله لكل خير

و كل عام و أنتم بخير

ثم  بركات استاذنا المناضل محب العلم عبدالفتاح كيرة 

لفت انتباهي ان المشاركات زادت على الستين ، وصاحب الموضوع  اكتفى بطرح السؤال ثم اختفى

 

 

  • Like 2
قام بنشر (معدل)
7 دقائق مضت, ابوخليل said:

ثم  بركات استاذنا المناضل محب العلم عبدالفتاح كيرة 

لفت انتباهي ان المشاركات زادت على الستين ، وصاحب الموضوع  اكتفى بطرح السؤال ثم اختفى

نعم يا دكتور لقد اختفى لكن

احفادنا راح نستفيد من هذه المشاركات وهذه المواضيع باذن الله :smile:

 

تم تعديل بواسطه Shivan Rekany
قام بنشر (معدل)
11 دقائق مضت, ابوخليل said:
39 دقائق مضت, عبد الفتاح كيرة said:

 

ثم  بركات استاذنا المناضل محب العلم عبدالفتاح كيرة 

 

وفقك الله حبيبنا الأستاذ أبا خليل

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

و مع أن فكرة تحديث جدول من آخر ليست بالمتعارف عليها

إلا أنها جرت كل هذه المهارات

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

سأدرج  الرابط قريبا إن شاء الله

كل  عام أنتم بخير

تم تعديل بواسطه عبد الفتاح كيرة
  • Like 1
قام بنشر
12 ساعات مضت, Shivan Rekany said:

11.PNG.0ec552facbae64cad5fd44232fa0d7df.PNG

لكن يجب كل موضوع تعمله فرز حسب تاريخ

 

شكرا لك على التنبيه والذي لم انتبه له من قبل .. اكرر شكري وتقديري :fff:

  • Like 1
قام بنشر
6 ساعات مضت, عبد الفتاح كيرة said:

رابط مجلد الموضوع
و لعله لم ينته بعد!

https://drive.google.com/drive/folders/0Bw4O7dVd4FBfM1V1aEZIUmFfZGM?usp=sharing

جهد جبار جزيت خبرا

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

تحياتي

  • Like 1
قام بنشر
في 5/30/2017 at 12:29, عبد الفتاح كيرة said:

الأستاذ  @رمهان

أنا جهزت مرفقا لتطبيق ما تفضلت به

و فيه بعض المحاولات

أرجو الاطلاع و التعديل

و المطلوب هو

أحدث تاريخين من حقل السنة و هو رقمى

لكل موظف

ثم تحديث الجدول الأول t1

بهذه النتائج

testo.rar

المطلوب أعلى قيمة  و السابقة لها فى حقل السنة

أين تنفذ هذه الصيغة السابقة

أنا استخرجتها فى استعلام

بعد ذلك

كيف نحدث الجدول الأصلى

ليتك تطبق لنا المعادلة على الملف المرفق

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

السلام عليكم استاذ @عبد الفتاح كيرة

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

UPDATE t1 SET t1.taq = DLookUp("taqq","t2","yy=" & Nz(DMax("yy","t2","empid=" & [id]),0) & " and empid=" & [id]), t1.t3am = DLookUp("yy","t2","yy=" & Nz(DMax("yy","t2","empid=" & [id]),0) & " and empid=" & [id]), t1.taq2 = DLookUp("taqq","t2","yy=" & Nz(DMax("yy","t2","empid=" & [id] & " and yy<>" & DMax("yy","t2","empid=" & [id])),0) & " and empid=" & [id]), t1.t3am2 = DLookUp("yy","t2","yy=" & Nz(DMax("yy","t2","empid=" & [id] & " and yy<>" & DMax("yy","t2","empid=" & [id])),0) & " and empid=" & [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.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information