jjafferr

تفضل اخي :) طبعا انا لعبت في معلومات الجدول :) مثالين على طريقة العمل (رجاء لصقه في برنامجك حتى تراه بالطريقة الصحيحة): الاول هكذا: "[Name COMPTE] = '" & Me . cmdDiscount_BDL . Caption & "'" والثاني هكذا: "[Name COMPTE] = 'BEA'" Private Sub cmdDiscount_BDL_Cli…

كودك بعد التصحيح: On Error GoTo err_Error_msg If IsNull(Reference) Then MsgBox "Please add Referance ", vbOKOnly + 64, "Job Code" DoCmd.CancelEvent Reference.SetFocus ElseIf IsNull(Type_a) Then MsgBox "Please Insert Type", vbOKOnly + 64, "Work Done" DoCmd.Canc…

وكيف تقوم بالتصفية حاليا؟ بالنسبة لاعمدة السنة ، بدلا عن Group by ، تستطيع ان تستخدم Where او Expression. بما انك لم ترفق مثالك ، فاضطررت ان اعمل مثال بسيط ، وبه 3 انواع من الاستعلام ، والكل يعطي نفس النتيجة: 1. النموذج وبه السنة: 2. الاستعلام الاول ونتيجته 3.…

وعليكم السلام اخي :) سؤالك غير واضح :( ولكن اذا كان فهمي صحيح ، فتفضل هذه الخطوات: عند اختيارك "مدفوعات الطلاب" مثلا من ComBox_Reports ، فالتقرير يكتب هذا الاختيار كذلك في النص39 والذي معادلته =[Forms]![FormSudents]![ComBox_Reports] فاذا اردت ان تكتب جملة غير …

وعليكم السلام اخي :) الافضل ان لا تدمج الحقول ، وانما تعمل لكل سنة عمودها الخاص في الاستعلام ، وتصفي كل عمود على حدة :) جعفر

حياك الله ، وشكراً على لطف كلماتك :) جعفر

اخي الكريم مب انت بس اللي " مشكلة أعجزتني وهدتني وتعبتني كثيرا" وانما انا كذلك :( والسبب يعود الى طريقة ربطك الحقول بعضها البعض :( (وستلاحظ هذا لاحقا ****). على العموم هذه خطوات العمل: نختار حقل رقم الصنف ، ثم نضغط على الزر الصغير اللي فيه 3 نقاط (مؤشر عليه با…

وعليكم السلام اخي :) هذا الرابط يشرح العملية ، بس اذا كان الحقل مضبط في الجدول : /index.php/topic/276386-سؤال-فى-مشروع-انشاء-برنامج-لسوبر-ماركت/?p=1333453 تقدر تعمل نفس الشئ للحقل في النموذج ، بأخذ الخطوة الاولى بدل الجدول :) جعفر

وعليكم السلام بومهدي :) تفضل :) 1. لازم تختار الشهر لطباعة التقرير ، 2. اختيار القسم مب اجباري ، 3. اختيار الاسبوع ماله تأثير. جعفر 190.العمالة.mdb.zip

تفضل اخي هذا الكود :) تم تصحيح سطرين في الكود: Private Sub ÊÓãíÉ10_Click() If Me.prent = 1 Then DoCmd.OpenReport "استعلام3", acViewPreview, "", , acNormal End If If Me.prent.Value = 2 Then Dim vItem As Variant Dim sWhere As String For Each vItem In zxc.ItemsSe…

وعليكم السلام ورحمة الله وبركاته انا صادفت نفس المشكلة في يوم من الايام ، مع قاعدة بيانات قديمة ، والطريقة الوحيدة التي تمكنت من استخراج البيانات ، كانت عن طريق البرنامج (والذي كان يعمل في بيئة MS Dos) بتصدير البيانات الى ملف txt او شئ مشابه ، ومنها عملت على ا…

الله يطول في عمرك أن شاء الله :) ، هذا مثال طريقة العمل ، وانت زيد ونقص حسب حاجتك :) طيب شو لو بغيت تحفظ المحادثة في جدول مثﻻ؟ ومثﻻ أريد محادثتي باللون اﻻزرق ، ومحادثتهم باللون اﻻسود؟ ووووو ... :) جعفر

حياك الله اخي ابراهيم :) رجاء مراجعة هذا الرابط: /index.php/topic/285447-الفورم-لا-يقبل-تعديل-البيانات/?p=1371584 جعفر

تفضل ، هذا الاستعلام :) SELECT DISTINCT no1.[no], no1.part, Min(no2.price) AS MinOfprice, DLookUp("[seller]","no2","[no]='" & [no1].[no] & "' And [Price]= " & DMin("[Price]","no2","[no]='" & [no1].[no] & "'")) AS S FROM no1 INNER JOIN no2 ON no1.[no] = no2.[no…

وهذا مثال بسيط على ذلك: جعفر 131.zip

الاجابة مختصرا ايضا: نعم :) جعفر

هﻻ والله ، وسﻻمة رأسك يالغالي :) جعفر

تفضل يالغالي :) بس ان شاء الله يكون اللي تريده :) جعفر 178.2.TQAReeeeR.accdb.zip

تفضل اخي :) في الجدول: والنتيجة: واهلا وسهلا اخي محمود ، عودا حميدا ان شاء الله :) جعفر

اخي الفاضل الظاهر انك غير جاد في طلبك للمساعدة!! سؤالك هو: هل يمكن انشاء تقرير من ثلاث جداول ...... كما بالصورة المرفقة صورة للتقرير المراد 1. في مشاركتك الاولى ، البيانات في قاعدة البيانات لم تطابق الصورة: أ- في الصورة: يوجد مستند بيع ، ولكن لا يوجد هذا الحقل…