jjafferr

وهذه طريقة أسهل لثانياً :) والاستعلام المستخدم هنا هو qry_Before_and_Last_daate2 حيث نستخدم شرطين لخانة daate وهما نفس الشرطين اللذان كانا في الامثلة السابقة: DLast("[daate]","Tbl_Taqwem","[PcDigit]=" & [PcDigit] & " AND [daate]<#" & DLast("[daate]","Tbl_Taqwe…

الاخ ابراهيم لم تظهر الصورة :( بالنسبة لأخذ المعلومة ، يمكن عمل ComboBox او ListBox في اي نموذج ، والذي يُظهر لك جميع المعلومات التي تريدها (سواء من جدول او استعلام) ، ثم تختار الذي تريد ، ولا داعي للنسخ واللصق من نموذج آخر. اعطني قاعدة بيانات ، واخبرني ما تري…

وهذه البقية :) Private Sub IDDox_R_BeforeUpdate(Cancel As Integer) On Error Resume Next 'Count the number of occurances for this Job_ID, and IDDox_R: 'count it for number of Receipt_No a = DCount("[Receipt_No]", "DocumentR_O", "[iDDox_R]='" & Me.IDDox_R & "'" …

تفضل أخوي :) أولاً: وعلشان ما نحصل نتائج مزدوجة ، نستخدم المعادلة التالية كشرط لخانة Yare ، وهي تشترط آخر نتيجة من الحقل Yare: DLast("[Yare]","Tbl_Taqwem","[PcDigit]=" & [PcDigit]) وثانياً: وهي وجود التاريخين الاخير والقبل الاخير جنباً الى جنبز أما النتيجة الت…

سلام الآن بدأت العمل على Qory_taqwm22 ولاحظت انك وضعت ملاحظة بالنسبة الى Qory_taqwm12 ، ولكني لم افهم هذه الملاحظة ، رجاء تفسيرها بمثال لوسمحت (مثالك للإستعلام Qory_taqwm22 جدا واضح ، فياريت امثلتك تكون جميعها هكذا :) جعفر

الرد على أولاً :) Private Sub IDDox_R_AfterUpdate() 'save the Record DoCmd.RunCommand acCmdSaveRecord 'requery the ComboBox, to avoid getting empty cells Me.IDDox_R.Requery End Sub '======================================================== Private Sub IDDox_R_G…

أخي أعتقد عندك خطأ في مسار ملف اﻻوتلوك، فبدل D:/Program يجب أن يكون C:/Program جعفر

ولا يهمك ، إن شاء الله سأحاول اللعب بالكود BeforeUpdate ، مثل ما كان طلبك سابقاً ، واوافيك بالنتيجة غداً إن شاء الله :) جعفر

1. بالنسبة الى التنسيقات الممكن عملها في Memo field, Rich text ، فإنه من الافضل عملها مباشرة من ايقونات التنسيق ، ولا عملها من VBA. 2. التنسيقات المتاحة لك عملها في Memo field, Rich text ، والتي هي بعض اوامر لغة HTML وليست جميع اوامر HTML ، فالرابط يخبرك عن ال…

انا آسف :( الظاهر بالغلط رفعت ملف آخر كنت اشتغل عليه :( واليك النسخة الصح :) جعفر 11.Maxrecord.zip

نعم هذا الذي تم العمل على أساسه :) فهل هناك خطأ في البيانات؟ جعفر

المطلوب سابقا كان: >أريد عدم تكرار IDDox في نفس رقم Job_ID مع كون Receipt_No فارغ، أي السماح بالتكرار اذا كان Receipt_No غير فارغ. فهل في تغيير في الطلب؟ جعفر

المرفق بصيغة mdb ، اي انه من عائلة الاكسس 2003 فأقل، واذا اردت التنسيق مثل ما طلبت ، فيجب ان يكون بصيغة accdb ، اي من عائلة الاكسس 2007 فأكثر. لذا ، يمكنك اسخدام احد الخيارين الاخيرين (واللذان لا املكهما :( جعفر

تفضل أخي ، ولا تنسانا من دعائك :) عملت استعلامين جدد هما Qory_taqwm12 و Qory_taqwm22 ارجوا ان يكونوا كما طلبت ، مع اني غير متأكد من الطلب الاخر. جعفر

بالنسبة لأكسس 2007 فما فوق فإنه يمكن ، لانه جزء من البرنامج ، وهذا الرابط يعطيك مثال: http://www.accessjunkie.com/Pages/faq_08.aspx بالنسبة لما قبل هذا ، فهناك برامج مضافة يجب ان تشتريها وبالتالي تستطيع عمل الذي تريد ، هذا رابط احد هذه البرامج المشهورة: http:/…

وعليكم السلام انا عادةً لا اترك الاختيار للمستخدم لكي يقبل او لايقبل شروط البرنامج (حدث BeforeUpdate المقترح ، ينبه المستخدم) ، لذلك فاحاول جعل البرنامج يضيق الاختيارات برمجياً ، ثم يسمح للمستخدم الاختيار من القائمة (مثلا) فقط. هناك عدة طرق لتصفية الاختيارات ،…

هممم على بركة الله :) جعفر

انا اعرف اني اضعت وقتك في اسألتي ثم لم اعطك جوابا ، ولكن سؤالك كان نظري ، ولا توجد اجابات لجميع الاسئلة النظرية ، فاذا سمحت لي واخبرتني عن واقع البرنامج فلربما استطيع مساعدتك. إخباري بواقع البرنامج معناه ان تبدأ بنموذج وتخبرني ما الذي تريد فعله فيه، ولماذا تري…

جرب هاي المعادلة: IIf(([Now Quarter End]-[N T P])/([End of Contract]-[N T P])>1,1,([Now Quarter End]-[N T P])/([End of Contract]-[N T P])) جعفر

إذا حبيت ، ممكن ترسل لي النموذج اللي تجري فيه هذه العملية الحسابية ، وأحاول اشوف لك وين المشكلة :) جعفر