ابوخليل

الفكرة حلوة .. ولكن مسألة Between 1 And 15 مشكلة حقيقية لان كل قيمة في مربع التحرير لها ارقامها الخاصة والموجود الآن 1740 رقم ويمكن تصل الى 12000 كحد اقصى فلو تم التقسيم عشوائيا ، مثلا عدد السجلات الحاصلة قسمة عدد النماذج الفرعية وكل نموذج ياخذ نسبة

السلام عليكم استخدم مثل هذا للفرز باتجاهين strFilter = ("SELECT * FROM tbll ORDER BY tbll.name1 ASC;") strFilter2 = ("SELECT * FROM tbll ORDER BY tbll.name1 DESC;") If chk.Value = 1 Then DoCmd.OpenReport "rep1", acViewPreview, strFilter Else DoCmd.OpenReport "rep1", acViewPreview, strFilter2 End If tbl1 يمثل الجدول مصدر البيانات و rep1 يمثل التقرير و chk حقل في النموذج لوضع قيمة كشرط

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

المشكلة في التحويل هذا الملف الاصل New Microsoft Access Database.accdb

جرب هذه الطريقة New Microsoft Access Database.rar

نعم يمكنك تغيير ملف الفيديو بشرط ان مشغل وندوز ميديا يدعم نوع الملف بالنسبة للادوات يمكنك اخفاؤها .. انظر الصورة

تفضل هذا مثال حسب فكرتك تشغيل فيديو.rar

لم افهم بالضبط ما تريد ولكن انظر الى التقارير في المثال المرفق db11.rar

حبيبنا الملصق عندك .. حط عليه المسطرة

مشكور وجزاك الله خير .. وخذ راحتك

اهلا استاذ رمهان القصد هو التحرير وليس العرض والحد المطلوب ظهوره هو 58 أو 60

4*6 ملي متر ؟

تريد هذا المقاس لحجم البطاقة او للباركود ؟

السلام عليكم اعتقد لن تتمكن من اتاحة التعديل على مقاسات التقرير للمستخدم الا عندما يكون المشروع مفتوح على صيغة mdb أو accdb بحيث عند تنفيذ الكود يتم فتح التقرير على التصميم ثم التعديل ثم الحفظ ورأي اخونا kaser906 انك تعمل ملصقات عدة حسب المقاسات الشائعة ويتم الاختيار منها

السلام عليكم اخواني واحبتي : في المثال المرفق نموذج مستمر ، عند التصفية من مربع التحرير يظهر 58 سجل في عمود واحد اريد عرض هذه السجلات في اكثر من عمود ، بالضبط كما نعمل في التقارير . الذي اعرفه انه في التقرير يتم عمل ذلك من خصائص اعداد الصفحة والنموذج يوجد فيه هذه الخصائص نفسها ولكنه لا يستجيب . قلت : لعل الاصدارات بعد 2003 تدعم هذه الخصيصة في النموذج افيدونا مأجورين ،،، test.mdb

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

؟؟ من الاول ليه تنقلهم ؟ الفكرة غير صالحة لانه يمكنك عرض المتأخرين بالسداد لوحدهم في فورم جديد من الجدول نفسه اخي الحبيب هذا رأيي وانت اعمل ما يحلو لك

حسب ما فهمت لا يلزمك ترحيل ولا استعلامات فقط اضف عمود لتضع فيه علامة لمن تجاوز المدة المحددة والكود المسؤول عن احتساب المدة مثل هذا Cmonth = DateDiff("m", Date1, Date()) يستخرج عدد الاشهر وتعمل استعلام تحديث للعمود الجديد بعد الفحص بهذه الدالة لكل سجل فيكون عندك شرطين : عدم السداد والمدة

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

الاعلان عن القيمة وبدون المرور على السجلات لانها حقل واحد Dim rs As Recordset Set rs = CurrentDb.OpenRecordset("SELECT Count(*) as expr1 FROM (SELECT DISTINCT tblcomIn.Datem FROM tblcomIn)as expr2 ") MsgBox rs!expr1 شكرا ابا جود ،،،

تسلم . تصل بالسلامة ..

الذي عندي بعضا مما عندكم ، جزاك الله خير الثلاث الاول واضحة ومفهومة . نريد الرابعة لا حرمك الله الأجر

اريد استخدم الرقم الناتج من جملة سلكت في اي مكان من البرنامج. تحويله الى متغير

صحيح .. لا شك ان جملة سلكت افضل واسرع السؤال الآن استاذنا كيف اعلن عن هذا الرقم الناتج ؟

يا سلام رائع .. رائع كما عودتنا استاذنا الكريم ولي عودة للاستفسار لانه يحدث اشياء غريبة عند اللصق وعند اعادة فتح الاستعلام تختلف وتتغير بعض البيانات لاني كنت اكتب ما ذكرته سابقا مارأيكم : Dim db1 As Database Dim rs As Recordset Set db1 = CurrentDb Set rs = db1.OpenRecordset("SELECT tblcomIn.Datem FROM tblcomIn GROUP BY tblcomIn.Datem") MsgBox rs.RecordCount نعم .. اتضحت .. الاستعلام يضيف للكود اسماء مستعارة للحقل وللجدول