صالح حمادي

نعم أخي و أستاذي رمهان شكرا على الملاحظة فهذا الكود لا يفي بالمطلوب فأنا جربته و لم يحقق الهدف. فالكود الصحيح هو كالتالي: Do While Me.l.ListCount <> 0 Me.l.RemoveItem 0 Loop آسف لأني طلعت الكود الخطأ شكرا جزيلا أخي و صديقي رمهان list box.rar

شكرا لكم إخوتي الأستاذ رمهان و الأستاذ محمد أيمن و الأستاذ أبو عبد الله الحلواني زادكم الله من علمه و فضله. و أيضا هذا الكود بإمكانه أن يقوم بالمهمة المطلوبة. Private Sub أمر2_Click() Do While currentrecord <> Me.list0.ListCount list0.RemoveItem 0 Loop End Sub

السلام عليكم و رحمة الله تعالى و بركاته إخوتي الأكارم حياكم الله. هل يوجد كود يقوم بحذف عناصر مربع نص List Box دفعة واحدة مثال: لدي مربع نص به ثلاث أو أربعة عناصر و أريد أن أحذف هذه العناصر بالضغط مرة واحدة على زر الحذف وشكرا جزاكم الله خير الجزاء list box.rar

و عليكم السلام و رحمة الله تعالى و بركاته كل عام و الأمة الإسلامية بخير إن شاء الله

أضفت ماكرو تحديث (Requery) لزر البحث

البرنامج الذي أعطيتك إياه يقوم بنفس العمل كلما كتبت حرف يقوم بالتصفية كما طلبت. هذا ما فهمته من شرحك

تفضل... UrgentHelp.rar

السلام عليكم تفضل ربما هذا ما تحتاجه testبريد بيروت النفوس.rar

أنت أكبر من أن تحتاج إلى تشجيع أستاذنا الكريم فأعمالك تتكلم عليك

ما شاء الله أخي عبد الفتاح أنت دائما في الموعد أعانك الله

أخي ما هي الحقول التي تريد أن تستعملها للبحث. هل هي Classification و ClassificationID معا أم ماذا ؟ و ماذا تقصد بشخص لديه الـ Classification مشتركة

السلام عليكم و رحمة الله و بركاته. هذا هو كود الحفظ: DoCmd.Save هذا كود الحذف: DoCmd.RunCommand acCmdDeleteRecord أما بالنسبة لإستخدام الماكرو فيجب أن تختار من خصائص الزر حدث عند النقر و تختار منشئ الماكرو. تكتب في الإجراءات Runcommand و الوسيطات تكتب Saverecord أما بالنسبة للحذف تستبدل Saverecord بــ Deleterecord

راجع هذا الملف و أخبرني أخي Forum.rar

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

الله يحفظك يا أخي الغالي

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

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

نعم ممكن تضع ثلاث شروط DSum("[CN]", "VA", "Sap = SA and DatePart("y", Date1)=DatePart("y", Da)and DatePart("m", Date1)=DatePart("m", Da)") أو ممكن تستعمل إستعلام لحساب المجموع

استعمل الدالة DatePart ("y"; data1) لإستخراج السنة من التاريخ data1 DatePart ("m"; data1) لإستخراج الشهر من التاريخ data1

أخوتي و أساتذتي الكرام الوزير و رمهان. لكم جزيل الشكر على هذا المجهود و جعله الله في ميزان حسناتكم إن شاء الله لقد توصلت إلى ما أصبو إليه و ذلك من خلال دمج كود الأستاذ الوزير و الأستاذ رمهان و إجراء بعض التعديلات البسيطة. و قد أصبح الكود يقوم بترتيب الحقل الأول تنازليا و الحقول الأخرى يرتبها تصاعديا. هذا هو الكود: Me.sfr.Form.OrderBy = "nom" & " desc" & "," & "adress,anne,place" Me.sfr.Form.OrderByOn = True أنا أتعلم الأكسس وحدي في المنزل بإستعمال التجارب يعني كل مرة أجرب تعديلات على الكود حتى أتوصل إلى الحل. هذا هو السبب الذي يجعلني في كل مرة أطرح سؤال بالمنتدى و ذلك للإستفادة من خبرتكم.

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

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

السلام عليكم و رحمة الله و بركاته أيها الإخوة الأفاضل حياكم الله في هذا اليوم السعيد " جمعة مباركة ". أبحث عن طريقة تقوم بترتيب سجلات جدول حسب 4 أو 5 حقول. مثلا لدي جدول به 5 حقول أريد ترتيب سجلاته حسب الحقل الثاني ثم حسب الحقل الثالث ثم الرابع ثم الخامس. جزاكم الله خير الجزاء Microsoft Office Access 2007 قاعدة بيانات جديد.rar

تفضل هذا ملفك أخي بعد التعديل test.rar

شكرا جزيلا أستاذي بارك الله فيك و جعلها الله في ميزان حسناتك إن شاء الله