jjafferr

الحمدلله الذي منّ على منتدانا بكوكبة من الشباب المعطاء ، يغبطنا بل ويحسدنا عليها الكثيرون 🙂 اخي محمد ، رجاء اكمل معروفك ، بتقديرك عمل الاعضاء اللذين ساعدوك ، بعمل Like لمشاركاتهم المفيدة: ثم اختار افضل مشاركة التي اعطتك الاجابة الصحيحة (وطبعا ليست مشاركتي ، لأنها كانت لحل مشكلة اخرى 🙂 ) : . جعفر

السلام عليكم 🙂 وكما تفضل اخوي فايز ، لا يوجد شيء اسمه جدول منبثق ، ولكن تستطيع عمل نموذج جدولي (واللي يشبه الجدول 100%) منبثق 🙂 جعفر

وعليكم السلام 🙂 اسمحوا لي ان ادلوا بدلوي في هذا الموضوع ، وفيه شرح لحقل الترقيم التلقائي : وهنا حوار مع المحاسب الاخ عبدالله قدور ، فنيا 🙂 وانا اتفق مع اخوي محمد أبوعبدالله بهذه الطريقة : جعفر

وعليكم السلام اخي عبداللطيف 🙂 بالفعل وكما تفضلت ، اسهل طريقة هي ان تجعل اعدادات الحقول المهمة في جدول النموذج الرئيسي: مطلوب: نعم ولكن حذاري ان تجعل بقية الحقول الغير مهمة كذلك ، فالمستخدم قد لا يملك تلك المعلومة ، فإنه سيضع اي قيمة فيها علشان ينتقل للنموذج الفرعي !! جعفر

- انا كلما اشوف رسالة خطأ في OLE و عنصر ActiveX ، فغالبا المشكلة في اعدادات الوندوز : A problem occurred while Microsoft Access was communicating with the OLE server or ActiveX control https://www.officena.net/ib/topic/59481-استفسار-هام-بخصوص-اللغة-والبرمجة/?do=findComment&comment=381019 https://www.officena.net/ib/topic/64955-مشكلة-عند-فتح-البرنامج-على-ويندوز-8/?do=findComment&comment=423014 جعفر

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

السلام عليكم 🙂 ولكن الرابط لم يكن للبرنامج من موقع الشركة او رابط للتنزيل فقط ، وإنما كان: جعفر

السلام عليكم 🙂 اما انا فأتفق مع اخوي عبداللطيف ان هذه المعلومات متوفرة في الانترنت ، واللي يريد هذا الشيء يمكنه الحصول عليها 🙂 ولكن اللي ما اتفق فيه مع اخوي عبداللطيف هو مخالفة قوانين المنتدى بوضع السيريال في البرنامج المرفق ، مما يجعله "مخالف لحقوق الملكية الفكرية" للبرنامج المرفق ، لذا وجب حذف رابط التحميل 🙂 جعفر

الظاهر ان اخوي ازهر بالفعل لقى المطلوب بالبحث 🙂 جعفر

وعليكم السلام 🙂 اخوي ازهر ، انت تعرف ان خاصية البحث في المنتدى ممكن تغنيك عن الكثير من الاجابات 🙂 جعفر

قواعد المشاركة فى الموقع اضغط هنـــــــــامن فضلك لقراءة القواعد كاملة و بصفة خاصة نؤكدعلى ما يلي 1- يمنع منعا باتا نشر أية مواد تخالف حقوق الملكية الفكرية و يرجى الابلاغ عن المشاركات المخالفة من خلال زر تقرير اسفل المشاركة 2-يجب استخدام خاصيةالبحث قبل طرح السؤال توفيرا للوقت و الجهد. 3-ضرورة كتابة عنوان واضح للموضوع يدل على محتواه ويعطي وصفاً مختصرا للسؤال. 4-ممنوع منعا باتاً كتابة عناوين سينمائية مثل عاجل ، نداء الي فلان ، الي الخبراء ، طلب مساعدة ، أريد حلا..... 5-يمكن استعجال الرد باستخدام تعبير -للرفع- و غير مسموح بالالحاح او اللوم فجميع الاعضاء يشاركون تطوعا طبقا لسعة وقتهم. ومخالفة ذلك تعرض الموضوع للحذف مخالف - يُغلق

وعليكم السلام 🙂 البرنامج مقتوح ، وليس فيه حماية 🙂 جعفر

استاذ جمال ، تحية إجلال لك على عملك الجميل ، وعلى تذليل الاكسس لظروف فايروس كورونا 🙂 وفي الواقع انا مررت على هذا الموضوع مرارا ، وجمعت مجموعة من مواضيع التوزيع في المنتدى ، وبدل ان تظل على كمبيوتري بدون فائدة ، قلت ارفقها هنا لتعم الفائدة 🙂 https://www.officena.net/ib/topic/43119-ادارة-المقرات-والمراكز-الامتحانية/ https://www.officena.net/ib/topic/84391-التوزيع-الآلى-للجدول-المدرسى/ https://www.officena.net/ib/topic/12488-طلب-مساعدة-في-عملية-توزيع-معقدة-نوعاً-ما/ https://www.officena.net/ib/topic/77918-مكتبة-الموقع-كود-توزيع-الفصول-أوتوماتيكيا/ https://www.officena.net/ib/topic/70736-التوزيع-الألي-لا-يعمل-كما-يجب/ https://www.officena.net/ib/topic/88422-توزيع-الملاحظين/ https://www.officena.net/ib/topic/99299-مطلوب-توزيع-ركاب-على-الحافلات جعفر

وعليكم السلام اخوي محمد 🙂 جميع العاملين في المستشفيات (وفي هذه الايام بالذات) هم اصحاب الفضل 🙂 عملت تغيير ، فبدل ان يكون عندك ارقام في النموذج ، قد تكون عندك حروف او كلمات وجُمل ، فالتغيير يشمل كل شيء الآن: . واصبح الكود: Option Compare Database Option Explicit Private Sub ReportHeader_Format(Cancel As Integer, FormatCount As Integer) 'خطوة مؤقته لإخفاء جميع الكائنات ، وتحريكهم الى السطر العلوي 'Line 1 Me.lbl_11.Visible = False Me.lbl_12.Visible = False Me.lbl_13.Visible = False 'Line 2 Me.lbl_21.Visible = False 'اخفاء Me.lbl_21.Left = Me.lbl_11.Left 'مكانه من يسار التقرير Me.lbl_21.Top = Me.lbl_11.Top 'مكانه من علو التقرير Me.lbl_22.Visible = False Me.lbl_22.Left = Me.lbl_11.Left Me.lbl_22.Top = Me.lbl_11.Top Me.lbl_23.Visible = False Me.lbl_23.Left = Me.lbl_11.Left Me.lbl_23.Top = Me.lbl_11.Top 'Line 3 Me.lbl_31.Visible = False Me.lbl_31.Left = Me.lbl_11.Left Me.lbl_31.Top = Me.lbl_11.Top Me.lbl_32.Visible = False Me.lbl_32.Left = Me.lbl_11.Left Me.lbl_32.Top = Me.lbl_11.Top Me.lbl_33.Visible = False Me.lbl_33.Left = Me.lbl_11.Left Me.lbl_33.Top = Me.lbl_11.Top '----------------------------- Dim L As Integer 'بما ان الاختيار من النموذج عبارة حروف/كلمات 'فنعطي لكل منها رقم سطر If Forms!Form1!lst_Line = "A" Then L = 1 ElseIf Forms!Form1!lst_Line = "B" Then L = 2 ElseIf Forms!Form1!lst_Line = "C" Then L = 3 End If '----------------------------- 'اظهار السطر الصحيح ، وتحريكه الى مربعات السطر الاول Me("lbl_" & L & "1").Visible = True Me("lbl_" & L & "2").Visible = True Me("lbl_" & L & "3").Visible = True Me("lbl_" & L & "1").Left = Me.lbl_11.Left Me("lbl_" & L & "1").Top = Me.lbl_11.Top Me("lbl_" & L & "2").Left = Me.lbl_12.Left Me("lbl_" & L & "2").Top = Me.lbl_12.Top Me("lbl_" & L & "3").Left = Me.lbl_13.Left Me("lbl_" & L & "3").Top = Me.lbl_13.Top 'تغيير ارتفاع القسم في التقرير Me.ReportHeader.Height = Me.Label11.Height * 2 End Sub جعفر 1228.R_MultiHead.accdb.zip

العفو، تم تحديث المرفق ، وشكرا على التنبيه 🙂

اما انا ، وفي الدورات التي اعطيها ، فأنصح المشاركين بعدم الرجوع الى اليوتيوب ، لأن فيه وللأسف الشديد ، الكثير والكثير من المعلومات الغلط ، والمعلومات الغير كامله ووو ، ويكون من الصعب على المبتدئين التمييز بين هذه المعلومات ، فيقعون في المحظور !! وهذه المعلومة مثلها مثل اي معلومة اخرى ، يجب التحقق منها !! ولكن ، اي عمل/كود خطأ (وقد لا يكون خطأ ، وانما ليس الافضل) ، سواء في الكود او الماكرو او الاستعلام او النموذج او التقرير ، قد يعمل مشاكل في البرنامج مثل بطئ في العمل او عدم قيام الكود بعمله اصلا ، وهذا يصير حتى مع المحترفين 🙂 جعفر

وعليكم السلام 🙂 العفو اخي محمد ، ولكن قوانين المنتدى تسمح لك بسؤال في كل موضوع (مو مشروع في كل موضوع 🙂 ) 1. هذه ازرار السابق/اللاحق/السجل الجديد ، والاكسس يعملهم تلقائيا لك ، والمنتدى مليئ بأمثله له ، 2. ممكن ان تختار هذا السؤال حتى يساعدك الاعضاء ، 3. هذا زر والاكسس يعملهم تلقائيا لك ، 4. بالتعديل قصدك التعديل على الكميات ، وهذا له دخل في ادخال الكميات واخراجها في النموذج ، فلا علاقة له بتصميم التقرير . اذن ، السؤال الاصعب هو رقم 2 ، والامر راجع لك 🙂 جعفر

وعليكم السلام 🙂 اهلا وسهلا بك في المنتدى 🙂 رجاء مراجعة قوانين المنتدى ، حتى لا تتعرض مشاركتك للحذف : قواعد المشاركة فى الموقع اضغط هنـــــــــامن فضلك لقراءة القواعد كاملة و بصفة خاصة نؤكدعلى ما يلي 1- يمنع منعا باتا نشر أية مواد تخالف حقوق الملكية الفكرية و يرجى الابلاغ عن المشاركات المخالفة من خلال زر تقرير اسفل المشاركة 2-يجب استخدام خاصيةالبحث قبل طرح السؤال توفيرا للوقت و الجهد. 3-ضرورة كتابة عنوان واضح للموضوع يدل على محتواه ويعطي وصفاً مختصرا للسؤال. 4-ممنوع منعا باتاً كتابة عناوين سينمائية مثل عاجل ، نداء الي فلان ، الي الخبراء ، طلب مساعدة ، أريد حلا..... 5-يمكن استعجال الرد باستخدام تعبير -للرفع- و غير مسموح بالالحاح او اللوم فجميع الاعضاء يشاركون تطوعا طبقا لسعة وقتهم. ومخالفة ذلك تعرض الموضوع للحذف هذا السؤال تكرر اكثر من مرة ، ومع انه نستخدم هذا الكود عادة في برامجنا ، إلا انه قليلا جدا !! فهل هذا واجب منزلي او مساق في الكلية/الجامعة ؟ ابحث في المنتدى وستجد المواضيع ان شاء الله 🙂 جعفر

للاسف ما اقدر اشوف الصورة ، ولكن جرب هاي مع مرفقك الاصل : . . جعفر Database.zip

وعليكم السلام 🙂 حيا الله اخوي محمد ، صار لنا زمن ما شفناك 🙂 نعمل الترقيم في النموذج : يمكن ترك الكائنات في مكانها في تصميم التقرير ، ولكن: نغير اسماء الحقول ، حتى يسهل علينا ، مثل lbl_11 و lbl_12 و lbl_13 للسطر الاول ، وطبعا نفس الترتيب للأسطر الاخرى ، نخفي الحقول الغير مطلوبة (في الكود) ، والحقول المطلوبة ، نعطيها موقع (ابعاد) حقول السطر الاول ، Top و Left (في الكود) ، ونعمل الكود في حدث "عند تنسيق" القسم Report Header : . Option Compare Database Option Explicit Private Sub ReportHeader_Format(Cancel As Integer, FormatCount As Integer) 'خطوة مؤقته لإخفاء جميع الكائنات ، وتحريكهم الى السطر العلوي 'Line 1 Me.lbl_11.Visible = False Me.lbl_12.Visible = False Me.lbl_13.Visible = False 'Line 2 Me.lbl_21.Visible = False 'اخفاء Me.lbl_21.Left = Me.lbl_11.Left 'مكانه من يسار التقرير Me.lbl_21.Top = Me.lbl_11.Top 'مكانه من علو التقرير Me.lbl_22.Visible = False Me.lbl_22.Left = Me.lbl_11.Left Me.lbl_22.Top = Me.lbl_11.Top Me.lbl_23.Visible = False Me.lbl_23.Left = Me.lbl_11.Left Me.lbl_23.Top = Me.lbl_11.Top 'Line 3 Me.lbl_31.Visible = False Me.lbl_31.Left = Me.lbl_11.Left Me.lbl_31.Top = Me.lbl_11.Top Me.lbl_32.Visible = False Me.lbl_32.Left = Me.lbl_11.Left Me.lbl_32.Top = Me.lbl_11.Top Me.lbl_33.Visible = False Me.lbl_33.Left = Me.lbl_11.Left Me.lbl_33.Top = Me.lbl_11.Top '----------------------------- Dim L L = Forms!Form1!lst_Line 'نأخذ رقم السطر من النموذج ونختصره في المتغير L '----------------------------- 'اظهار السطر الصحيح ، وتحريكه الى مربعات السطر الاول Me("lbl_" & L & "1").Visible = True Me("lbl_" & L & "2").Visible = True Me("lbl_" & L & "3").Visible = True Me("lbl_" & L & "1").Left = Me.lbl_11.Left Me("lbl_" & L & "1").Top = Me.lbl_11.Top Me("lbl_" & L & "2").Left = Me.lbl_12.Left Me("lbl_" & L & "2").Top = Me.lbl_12.Top Me("lbl_" & L & "3").Left = Me.lbl_13.Left Me("lbl_" & L & "3").Top = Me.lbl_13.Top 'تغيير ارتفاع القسم في التقرير Me.ReportHeader.Height = Me.Label11.Height * 2 End Sub . والنتيجة : . جعفر 1228.R_MultiHead.accdb.zip

وعليكم السلام 🙂 انت ربطت استعلام اسم العميل بإسم الشركة : . . اذا حذفت الاسم في المربع الاحمر ، ستحصل على جميع الاسماء 🙂 جعفر

قواعد المشاركة فى الموقع اضغط هنـــــــــامن فضلك لقراءة القواعد كاملة و بصفة خاصة نؤكدعلى ما يلي 1- يمنع منعا باتا نشر أية مواد تخالف حقوق الملكية الفكرية و يرجى الابلاغ عن المشاركات المخالفة من خلال زر تقرير اسفل المشاركة 2-يجب استخدام خاصيةالبحث قبل طرح السؤال توفيرا للوقت و الجهد. 3-ضرورة كتابة عنوان واضح للموضوع يدل على محتواه ويعطي وصفاً مختصرا للسؤال. 4-ممنوع منعا باتاً كتابة عناوين سينمائية مثل عاجل ، نداء الي فلان ، الي الخبراء ، طلب مساعدة ، أريد حلا..... 5-يمكن استعجال الرد باستخدام تعبير -للرفع- و غير مسموح بالالحاح او اللوم فجميع الاعضاء يشاركون تطوعا طبقا لسعة وقتهم. ومخالفة ذلك تعرض الموضوع للحذف

وعليكم السلام 🙂 اخي الفاضل ابو ماجد 🙂 قسم الاكسس هو لمساعدة المبرمجين ، وتبادل الخبرات ، اما اذا اردت برنامج جاهزة ، فرجاء وضع طلبك في هذا الرابط : إعلانات شخصية بأجر للاعضاء ولكن لو بحث في المنتدى ، لوجدت الكثير من هذه المواضيع وبعض البرامج الجاهزة ، وبما ان المنتدى للفائدة العامة ، فالحل بالمراسلات الخاصة كذلك ممنوع 🙂 قواعد المشاركة فى الموقع اضغط هنـــــــــامن فضلك لقراءة القواعد كاملة و بصفة خاصة نؤكدعلى ما يلي 1- يمنع منعا باتا نشر أية مواد تخالف حقوق الملكية الفكرية و يرجى الابلاغ عن المشاركات المخالفة من خلال زر تقرير اسفل المشاركة 2-يجب استخدام خاصيةالبحث قبل طرح السؤال توفيرا للوقت و الجهد. 3-ضرورة كتابة عنوان واضح للموضوع يدل على محتواه ويعطي وصفاً مختصرا للسؤال. 4-ممنوع منعا باتاً كتابة عناوين سينمائية مثل عاجل ، نداء الي فلان ، الي الخبراء ، طلب مساعدة ، أريد حلا..... 5-يمكن استعجال الرد باستخدام تعبير -للرفع- و غير مسموح بالالحاح او اللوم فجميع الاعضاء يشاركون تطوعا طبقا لسعة وقتهم. ومخالفة ذلك تعرض الموضوع للحذف جعفر

لا يمكن عمل هذا في النموذج المستمر ، اما اذا كان النموذج فردي ، فتستطيع ان تعمل نموذج فرعي للحقول الباقية (نوع الاعانة ، تحديد .... ، ولكن يمكن عمل هذا في التقرير ، بحيث تعمل تجميع وفرز بالرقم ، وهذا الرابط يشرح طريقة العمل : جعفر

وعليكم السلام 🙂 اعتقد بأن الجملة اصبحت مفهومة اكثر الآن اسهل طرق عمل هذا الجدول المؤقت هناك فوائد للجدول المؤقت المُعد مسبقا ، وهذه الفائدة لا تجدها في استعلام عمل الجدول Make-Table ، فالجدول المؤقت الذي تصنعه انت ،تتحكم في عدد الحقول (فقد يكون هناك حقول تستخدم لها استعلام تحديث آخر لتحديث هذه البيانات) ، بينما استعلام عمل الجدول Make-Table يأخذ نفس عدد الحقول (طبعا يدويا تستطيع تغييرها) التي تستعملها من الاستعلام/الجدول الذي به النتائج ، ونوع كل حقل (هذا مهم ، لأنه قد يكون عندك حقل به ارقام ، ولكنك عمله حقل نص لأسبابك او لأنه يرتبط بحقل من جدول آخر من نوع نص ايضا) ، بينما استعلام عمل الجدول Make-Table اذا راى حقل رقم في الاستعلام ، فإنه يعمل حقل من نوع رقم في الجدول المؤقت ، والآن وبعد الحاق البيانات بهذا الجدول (سواء الجدول المؤقت المُعد مسبقا ، او الجدول المؤقت الذي يعمله استعلام عمل الجدول Make-Table ، يجب عمل استعلام تحديث بيانات من هذا الجدول ، الى الجدول المُراد تحديث بياناته 🙂 جعفر