ابوحمود

استخدم هذا الكود : Dim db As Database Dim rst As Recordset Dim عدد_السجلات As Integer, I As Integer, O As Integer Set db = CurrentDb Set rst = db.OpenRecordset("SELECT [تكرار اربعة أرقام].المجموعة FROM [تكرار اربعة أرقام] " _ & " WHERE ((([تكرار اربعة أرقام].ا…

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

حاول استخدام البحث لأن هذا الموضع طرق حتى مللنا منه . http://arabteam.nicmatic.com/vb/showthread...%DA%D4%D1%ED%E4 ولك تحياتي

أشكر الجميع على مساهماتهم جعل اله ذلك في ميزان حسناتهم . الأخ benga تم إلغاء شفرات HTML من التوقيع فلذلك لاتظهر الصور فيه :( الأخ mt والأخ مصراوي الموقع في طور الإنشاء إن شاء الله ، ولكن حتى لو إنشأ المشروع المراسلة ستكون طريق البريد العادي وليس الالكتروني وال…

نموذج خالي من البيانات ولك تحياتي

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

صغر الهوامش اليمين واليسار للتقرير -ضع لكل منها رقم 5 - وإذا لم تنفع فافتح التقرير في عرض التصميم وكما قال الأخ أشرف قلل من عرض التقرير بتصغير طول الكائنات عليه . ولك تحياتي

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

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

نعم تمشي . انظر الرابط : http://arabteam.nicmatic.com/vb/showthread...p?threadid=3592 ولك تحياتي

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

سعودي 31 الله يجزاك كل خير ويجعل كل من استدل على المشروع عن طريق الاعلان في ميزان حسناتك . انتظر المزيد من البقية . ولكم تحياتي

الأخوة يوجد مشروع دعوي كبير في مدينة الرياض لمراسلة المسلمين في أنحاء العالم . ارجو ممن يستطيع وضع رابط للصورة التالية : [*IMG] http://www.msaccess4arab.com/Pictures/Ndwoa.gif [/img*] بعد إزالة النجوم منه إما في توقيع أو في مواقعهم الشخصية أو أي موقع يرتاده ال…

السؤال غير واضح ؟ هل تقصد إظهار أسماء الجداول في القائمة ، انظر الرابط : أأضف قائمة بأسماء الجداول إلى CompoBox ولك تحياتي

الأخ فتى الوادي لم انتبه للسؤال جيداً . القائمة المبنية على جدول لايمكن الإضافة إليها بهذه الطريقة ، إذ كيف تضيف كلمة لقائمة مصدرها عبارة SQL ونوع مصدر الصف لها جدول/استعلام . ارجع للرابط المذكور في جواب fahadam تجد عدة طرق في ذلك . ولك تحياتي

سأشرح لك ما اعلمه عن Circle . تستخدم Circle لرسم دائرة في موقع معين على التقرير كالتالي : Me.Circle (الموقع ابتداء من اليسار,الموقع ابتداء من الأعلى),حجم الدائرة , لون الخط,اقتطاع جزء من الصورة من واحد الى ستة ,جمع جهتي الدائرة اليمنى واليسرى فمثلا لرسم دائرة …

الأخ سعودي نعم كانت مخفية . مثال جيد ، وهذه إضافة بسيطة : لإظهار كل التقارير الموجودة في القاعدة في القائمة المنسدلة المسماة CboReport ، ضع في حدث عند التحميل للنموذج : Dim obj As AccessObject, dbs As Object Dim الكل As Variant Set dbs = Application.CurrentPro…

الأخ سعودي غير السطر : عدد_سجلات_النموذج = Me.RecordsetClone.RecordCount بهذا السطر : عدد_سجلات_النموذج = DCount(Me.RecordsetClone.Fields(0).Name, Me.RecordSource) لقد كانت المشكلة في أن عدد سجلات النموذج عند الفتح هي سجل واحد حتى ولو كان الجدول به عدد اكبر من…

الأخ فتى الوادي أظن أن مثال الأخ أشرف كافي ووافي . عندي إضافة بسيطة للشهر في استعلام 1 غير الحقل dd إلى : الشهر: Format(month([التاريخ]);"mmmm") وسيظهر لك اسم الشهر . ولك تحياتي

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