سامر محمود قام بنشر يونيو 12, 2023 مشاركة قام بنشر يونيو 12, 2023 (معدل) الاخوة الكرام تحية طيبة وبعد من فضلكم عايز اعمل بس معيار اطلع بيه كل مشرف عنده كام اخلاء وكام انقطاع وكام لم يستلم علي فترة معينة حتي معبار واحد وانا هفهمه واكمل الباقي اكون شاكر لحضراتكم Graff.rar تم تعديل يونيو 12, 2023 بواسطه Moosak توضيح العنوان رابط هذا التعليق شارك More sharing options...
دروب مبرمج قام بنشر يونيو 12, 2023 مشاركة قام بنشر يونيو 12, 2023 8 ساعات مضت, سامر محمود said: معيار اطلع بيه كل مشرف في أي جدول المشرفين يرجى تحديد اسم الجدول الذي يحتوي على المشرفين رابط هذا التعليق شارك More sharing options...
Moosak قام بنشر يونيو 12, 2023 مشاركة قام بنشر يونيو 12, 2023 أخي @سامر محمود أنت تسأل عن طريقة عمل استعلام وليس معيار 🙂 رابط هذا التعليق شارك More sharing options...
سامر محمود قام بنشر يونيو 13, 2023 الكاتب مشاركة قام بنشر يونيو 13, 2023 @Moosak تمام حضرتك انا بس كنت اقصد معيار في الاستعلام @دروب مبرمج تحياتي لحضرتك علي الاستجابة هو جدول المشرفين اسمه جدول الاخلاءات وجدول نوع الاخلاء اسمه حالات الاخلاء رابط هذا التعليق شارك More sharing options...
أفضل إجابة دروب مبرمج قام بنشر يونيو 14, 2023 أفضل إجابة مشاركة قام بنشر يونيو 14, 2023 تفضل اضف هذا الكود ملاحظة : قد تجد بعض الصعوبات بالتعامل في الأكود بسبب المسميات العربية انشئ Module جديد و الصق فيه الكود الخفيف السهل هذا عبارة عن وظيفة أو دالة او سمها ماشئت Public Function SubSuoer(ID As Integer) As Integer Dim TbName, ColName TbName = "[ادخال الاخلاءات]" ColName = "[اسم مشرف القطاع]" ColName = "[اسم مشرف القطاع] = " & ID SubSuoer = DCount("*", TbName, ColName) End Function ولاستخدام الدالة بهذه الطريقة [TEXTBOX1] = SubSuoer(1) أو في الاستعلام SubSuoer(1) رقم 1 يعني رقم المشرف بناء على رقم المشرف سوف يقوم الكود بجمع عدد الاخلاءات مرفق برنامج بعد التعديل التعديل في الاستعلام التعديل في الاستعلام التعديل في الاستعلام Graff.zip رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.