kaser906 قام بنشر ديسمبر 3, 2017 قام بنشر ديسمبر 3, 2017 السلام عليكم ورحمة الله وبركاتة اريد جمع الحقل [Travel2] بناء على القيمة 2 من الجدول Visitors الشرط ان يكون الحقل [Num_brnamge]= حقل [Num_brnamge] في النموذج او الاستعلام اجتهدت وحاولت كتابته بهذه الطريقة بالاسفل لكن للأسف لايتم تطبيق شرط [Num_brnamge] =Nz(DSum("[Travel2]";"Tabil_Visitors";"[Num_brnamge]=Num_brnamge and [Travel2]=2");0)
jjafferr قام بنشر ديسمبر 3, 2017 قام بنشر ديسمبر 3, 2017 وعليكم السلام جرب هذا اذا الحقل رقم =Nz(DSum("[Travel2]";"Tabil_Visitors";"[Num_brnamge]=" & [Num_brnamge] & " and [Travel2]=2");0) اذا الحقل نص =Nz(DSum("[Travel2]";"Tabil_Visitors";"[Num_brnamge]='" & [Num_brnamge] & "' and [Travel2]=2");0) . في 3/12/2017 at 08:20, kaser906 said: ريد جمع الحقل [Travel2] بناء على القيمة 2 من الجدول Visitors Expand يجب ان تربط الجدولين في استعلام ، ومنه قيمة الحقل Visitors ستكون للسجل الصحيح. جعفر 1
kaser906 قام بنشر ديسمبر 3, 2017 الكاتب قام بنشر ديسمبر 3, 2017 في 3/12/2017 at 08:44, jjafferr said: اذا الحقل رقم =Nz(DSum("[Travel2]";"Tabil_Visitors";"[Num_brnamge]=" & [Num_brnamgeه1ا] & " and [Travel2]=2");0) Expand هذا الكود تعرف على الحقل Num_brnamge لكن لايتعرف على القيمة 2 في الحقل Travel2
jjafferr قام بنشر ديسمبر 3, 2017 قام بنشر ديسمبر 3, 2017 تمام ، اذن نحن في الطريق الصحيح جرب هذا =Nz(DSum("[Travel2]";"Tabil_Visitors";"[Num_brnamge]=" & [Num_brnamge] & " and [Travel2]=" & 2);0) جعفر 1
kaser906 قام بنشر ديسمبر 3, 2017 الكاتب قام بنشر ديسمبر 3, 2017 في 3/12/2017 at 08:44, jjafferr said: =Nz(DSum("[Travel2]";"Tabil_Visitors";"[Num_brnamge]=" & [Num_brnamge] & " and [Travel2]=2");0) Expand في 3/12/2017 at 09:09, jjafferr said: =Nz(DSum("[Travel2]";"Tabil_Visitors";"[Num_brnamge]=" & [Num_brnamge] & " and [Travel2]=" & 2);0) Expand الله يعطيك العافية استاذي كلا الكوديين يعملان بشكل ممتاز الخطأ كان مني حيث استخدمت دالة dsum بينما كان علي استخدام الدالة dcount للحصول على النتائج المطلوبة ما أريده الان كيف اظهر عد السجلات حسب الصورة
jjafferr قام بنشر ديسمبر 3, 2017 قام بنشر ديسمبر 3, 2017 يعني اذا قصدك ان تستعين بالمعادلة داخل الاستعلام ، فيجب ان تعمل استعلام تجميعي جديد ، والمصدر الاستعلام اعلاه ، ثم تضيف الحقل التالي: D: Nz(count(iif([Travel2]= 2; 1;0));0) جعفر 1
kaser906 قام بنشر ديسمبر 3, 2017 الكاتب قام بنشر ديسمبر 3, 2017 في 3/12/2017 at 15:17, jjafferr said: D: Nz(count(iif([Travel2]= 2; 1;0));0) Expand عملت الاستعلام لكن للأسف لم يتم العد حسب القيمة 2 تم عد جميع السجلات
jjafferr قام بنشر ديسمبر 3, 2017 قام بنشر ديسمبر 3, 2017 الكود اعلاه يحسب على اساس القيمة 2 ، فاذا ما حصلت على النتيجة ، فيا تراجع الاستعلام ، او ترفق لنا هذه الجزئية من برنامجك جعفر 1
kaser906 قام بنشر ديسمبر 3, 2017 الكاتب قام بنشر ديسمبر 3, 2017 (معدل) ارفاق جزئية المسألة بتطول لذلك ستأخطى هذه الجزئية حاليا وارفقها فيما بعد وأعود للكود الأول في 3/12/2017 at 08:44, jjafferr said: Expr2: Nz(DCount("[Travel2]";"Tabil_Visitors";"[Num_brnamge]=" & [Num_brnamge] & " and [Travel2]=" & 2);0) Expand ماذا لو اردت العد لأكثر من قيمة تكون مثلا عد القيمة التي تكون رقم 1 و2 و3 و6 و7 و8 تم تعديل ديسمبر 3, 2017 بواسطه kaser906 تعديل الكود
jjafferr قام بنشر ديسمبر 3, 2017 قام بنشر ديسمبر 3, 2017 تفضل =Nz(DSum("[Travel2]";"Tabil_Visitors";"[Num_brnamge]='" & [Num_brnamge] & "' and ([Travel2]=1 or [Travel2]=2 or [Travel2]=3 or [Travel2]=6 or [Travel2]=7 or [Travel2]=8)");0) 1
النجاشي قام بنشر ديسمبر 3, 2017 قام بنشر ديسمبر 3, 2017 في 3/12/2017 at 08:44, jjafferr said: وعليكم السلام جرب هذا اذا الحقل رقم =Nz(DSum("[Travel2]";"Tabil_Visitors";"[Num_brnamge]=" & [Num_brnamge] & " and [Travel2]=2");0) اذا الحقل نص =Nz(DSum("[Travel2]";"Tabil_Visitors";"[Num_brnamge]='" & [Num_brnamge] & "' and [Travel2]=2");0) . يجب ان تربط الجدولين في استعلام ، ومنه قيمة الحقل Visitors ستكون للسجل الصحيح. جعفر Expand ماشاء الله عليك استاذ جعفر الله يسعدك دوما وانت تسعي للخير تحياتي اليك يالغالي
kaser906 قام بنشر ديسمبر 3, 2017 الكاتب قام بنشر ديسمبر 3, 2017 في 3/12/2017 at 16:45, jjafferr said: =Nz(DSum("[Travel2]";"Tabil_Visitors";"[Num_brnamge]='" & [Num_brnamge] & "' and ([Travel2]=1 or [Travel2]=2 or [Travel2]=3 or [Travel2]=6 or [Travel2]=7 or [Travel2]=8)");0) Expand مع الأسف استاذي هذا الكود يظهر عبارة خطأ عند العرض لاحظ استاذي اني حولت الدالة الى Dcount في 3/12/2017 at 16:05, kaser906 said: Expr2: Nz(DCount("[Travel2]";"Tabil_Visitors";"[Num_brnamge]=" & [Num_brnamge] & " and [Travel2]=" & 2);0) Expand
jjafferr قام بنشر ديسمبر 3, 2017 قام بنشر ديسمبر 3, 2017 عفوا عفوا عفوا !! انا اعتذر عن هذا الخطأ تعديل اخير = iif([Travel2]=1 or [Travel2]=2 or [Travel2]=3 or [Travel2]=6 or [Travel2]=7 or [Travel2]=8 ; nz(Dcount("[Travel2]";"Tabil_Visitors";"[Num_brnamge]='" & [Num_brnamge] & " And [Travel2]=" & [Travel2]);0) ; 0) يعني في سطر واحد يصبح الكود = iif([Travel2]=1 or [Travel2]=2 or [Travel2]=3 or [Travel2]=6 or [Travel2]=7 or [Travel2]=8 ; nz(Dcount("[Travel2]";"Tabil_Visitors";"[Num_brnamge]='" & [Num_brnamge] & " And [Travel2]=" & [Travel2]);0) ; 0) جعفر
kaser906 قام بنشر ديسمبر 3, 2017 الكاتب قام بنشر ديسمبر 3, 2017 (معدل) في 3/12/2017 at 17:31, jjafferr said: عفوا عفوا عفوا !! انا اعتذر عن هذا الخطأ تعديل اخير = iif([Travel2]=1 or [Travel2]=2 or [Travel2]=3 or [Travel2]=6 or [Travel2]=7 or [Travel2]=8 ; nz(Dcount("[Travel2]";"Tabil_Visitors";"[Num_brnamge]='" & [Num_brnamge] & " And [Travel2]=" & [Travel2]);0) ; 0) يعني في سطر واحد يصبح الكود = iif([Travel2]=1 or [Travel2]=2 or [Travel2]=3 or [Travel2]=6 or [Travel2]=7 or [Travel2]=8 ; nz(Dcount("[Travel2]";"Tabil_Visitors";"[Num_brnamge]='" & [Num_brnamge] & " And [Travel2]=" & [Travel2]);0) ; 0) جعفر Expand نفس الشي أستاذ حمل المرفق وافتح استعلام Q1 ادخل رقم 9 عند فتح الاستعلام لتشاهد النتيجة ارجو منك أيضا فتح الاستعلام qryd للاطلاع على هذه الجزئية في 3/12/2017 at 15:30, kaser906 said: D: Nz(count(iif([Travel2]= 2; 1;0));0) Expand QryVisitors.rarFetching info... تم تعديل ديسمبر 3, 2017 بواسطه kaser906 ادخل رقم 9 عند فتح الاستعلام
jjafferr قام بنشر ديسمبر 3, 2017 قام بنشر ديسمبر 3, 2017 كان عندك ' زائدة في الاستعلام الاول ، لهذا السبب كنت تحصل على خطأ ، وتم تصحيح الاستعلام الثاني كذلك: . والنتائج . جعفر 779.QryVisitors.accdb.zip
kaser906 قام بنشر ديسمبر 3, 2017 الكاتب قام بنشر ديسمبر 3, 2017 ما شاء الله تبارك الله تحملني أستاذ قربنا ننهي الموضوع اريد في هذا الكود مجموع الحقول التي تحتوي على القيم وليس عدها Expr3: IIf([service]=1 Or [service]=2 Or [service]=3 Or [service]=6 Or [service]=7 Or [service]=8;Nz(DCount("[service]";"Tabil_Visitors";"[Num_brnamge]=" & [Num_brnamge] & " And [service]=" & [service]);0);0)
kaser906 قام بنشر ديسمبر 3, 2017 الكاتب قام بنشر ديسمبر 3, 2017 في 3/12/2017 at 21:24, jjafferr said: غيّر Dcount الى Dsum جعفر Expand غيرتها أستاذ لكن النتائج جاءت بارقام متعدده غير مفهومه
jjafferr قام بنشر ديسمبر 4, 2017 قام بنشر ديسمبر 4, 2017 شو السالفة ، نتائجنا ما تتفق انا اخذت المعادلة ، واشتغلت على طول: . وهاي المعادلة: Expr4: IIf([Travel2]=1 Or [Travel2]=2 Or [Travel2]=3 Or [Travel2]=6 Or [Travel2]=7 Or [Travel2]=8,Nz(DSum("[Travel2]","Tabil_Visitors","[Num_brnamge]=" & [Num_brnamge] & " And [Travel2]=" & [Travel2]),0),0) وهي Expr4: IIf([Travel2]=1 Or [Travel2]=2 Or [Travel2]=3 Or [Travel2]=6 Or [Travel2]=7 Or [Travel2]=8, Nz( DSum("[Travel2]","Tabil_Visitors","[Num_brnamge]=" & [Num_brnamge] & " And [Travel2]=" & [Travel2]) ,0) ,0) . ولكن ، استعمال الجمع غير صحيح ، لأنه ما عندك قيم علشان تجمعها ، وانما عندك خدمات تقوم بتعدادها (count او Dcount) جعفر
kaser906 قام بنشر ديسمبر 4, 2017 الكاتب قام بنشر ديسمبر 4, 2017 في 3/12/2017 at 21:20, kaser906 said: Expr3: IIf([service]=1 Or [service]=2 Or [service]=3 Or [service]=6 Or [service]=7 Or [service]=8;Nz(DCount("[service]";"Tabil_Visitors";"[Num_brnamge]=" & [Num_brnamge] & " And [service]=" & [service]);0);0) Expand استاذي تجاوزنا حقل Travel2 الان احنا نشتغل على حقل service
jjafferr قام بنشر ديسمبر 4, 2017 قام بنشر ديسمبر 4, 2017 وهو كذلك ونتيجة المعادلة: Expr4: IIf([Travel2]=1 Or [Travel2]=2 Or [Travel2]=3 Or [Travel2]=6 Or [Travel2]=7 Or [Travel2]=8,Nz(DCount("[service]","Tabil_Visitors","[Num_brnamge]=" & [Num_brnamge] & " And [service]=" & [service]),0),0) Expr4: IIf([Travel2]=1 Or [Travel2]=2 Or [Travel2]=3 Or [Travel2]=6 Or [Travel2]=7 Or [Travel2]=8, Nz( DCount("[service]","Tabil_Visitors","[Num_brnamge]=" & [Num_brnamge] & " And [service]=" & [service]) ,0) ,0) . . كذلك النتيجة صحيحة جعفر 779.QryVisitors.accdb.zip
kaser906 قام بنشر ديسمبر 5, 2017 الكاتب قام بنشر ديسمبر 5, 2017 (معدل) في 4/12/2017 at 19:20, jjafferr said: وهو كذلك ونتيجة المعادلة: Expr4: IIf([Travel2]=1 Or [Travel2]=2 Or [Travel2]=3 Or [Travel2]=6 Or [Travel2]=7 Or [Travel2]=8,Nz(DCount("[service]","Tabil_Visitors","[Num_brnamge]=" & [Num_brnamge] & " And [service]=" & [service]),0),0) Expr4: IIf([Travel2]=1 Or [Travel2]=2 Or [Travel2]=3 Or [Travel2]=6 Or [Travel2]=7 Or [Travel2]=8, Nz( DCount("[service]","Tabil_Visitors","[Num_brnamge]=" & [Num_brnamge] & " And [service]=" & [service]) ,0) ,0) . . كذلك النتيجة صحيحة جعفر 779.QryVisitors.accdb.zipFetching info... Expand يبدو أنني لم أستطع إيصال الفكرة لذلك انظر هذه الصورة فقد غيرت في معايير الاستعلام بالحقل Expr4 واعطاني نتيجة صحيحة لكني اريد مجموع 8 استاذي قمت بكتابة كود و توصلت للنتيجة المطلوبة في حقل نص غير منظم بالنموذج عن طريق هذا الكود Private Sub Form_Current() Tx = DCount("[service]", "Tabil_Visitors", "([Num_brnamge] =forms![fr].[Num_brnamge]and[service] =1 or[Num_brnamge] =forms![fr].[Num_brnamge]and[service] = 2 or[Num_brnamge] =forms![fr].[Num_brnamge]and[service] = 3 or[Num_brnamge] =forms![fr].[Num_brnamge]and[service] = 6 or[Num_brnamge] =forms![fr].[Num_brnamge]and[service] = 7 or[Num_brnamge] =forms![fr].[Num_brnamge]and[service] = 8 )") End Sub أرجو الآن تكون الفكرة وضحت بشكل افضل 780.QryVisitors.rar تم تعديل ديسمبر 5, 2017 بواسطه kaser906 إضافة المرفق
jjafferr قام بنشر ديسمبر 5, 2017 قام بنشر ديسمبر 5, 2017 وعليكم السلام المفروض يكون عندك استعلام عام ، واستعلام تجميعي يكون فيه البيانات المطلوبة: . جعفر 779.1.QryVisitors.accdb.zip 1
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.