jjafferr

عفوا ، مافهمت قصدك!!

لا يمكن التقارير مثلها ، مثل النماذج المستمرة ، الحقل الغير منضم تكون نتيجته واحده لجميع السجلات ، حسب علمي جعفر

وعليكم السلام اجري العملية الحسابية في استعلام جعفر

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

ما دام الكودين جاهزين ، فخلينا نستفيد منهم ، وانت دائما خير وبركة جعفر

حيالله أخوي اوخليل انا شغال على المطلوب ، وكنت مخلّص ، لولا الكمبيوتر تعّبني شوي جعفر

وانت بصحة وسلامة أخي الغالي محمد

تفضل 404.Sales (AccessFIX).accdb.zip

جعفر

وعليكم السلام أخي نعم البرنامج ليس مجاني ، واذا كنت مبرمج ، فيجب عليك الاحتفاظ بمجموعة من البرامج ، ومنها هذا البرنامج ، وقوانين المنتدى لا تسمح بتداول برامج غير شرعية اذا اردت ، فيمكنك ارفاق برنامجك وسنحاول استرداد ما يمكن ، بالبرنامج اعلاه او ببرامج اخرى جعفر

زاد الله فضلك أخي محمد انا قلت: وكنت اعني هذا الجدول: بحيث case1 يكون له الاولولوية في الفرز ، ثم يليه case2 ، فالرجاء تكملة الجدول بجميع المعايير ، ثم ننظر طريقة التعامل مع البرنامج والنموذج والكمبوبوكس القصد هنا ، انك تعطينا كل المطلوب ، ثم نحاول نحن ترجمة طلبك الى برنامج الله يجزيك كل خير ان شاء الله أخي أبوعبدالله ، يعني بعدك مصدقك ان كل العمانية سِحّار جعفر

السلام عليكم شكرا أخي محمد و الآن ، أريد ان أرى عمود خاص لكل من هذه المعايير في الجدول ، واسعار كل صنف جعفر

وعليكم السلام لما النموذج يُفتح ، فانه يأخذ بياناته من "مصدر البيانات" ، سواء جدول او استعلام او Recordset او حتى مصدر بيانات نموذج آخر مفتوح ، وعندما تعمل تغيير في مصدر بياناته ، فيجب ان تطلب من النموذج ان يقرأ من مصدر البيانات مرة اخرى، فيمكنك عمل هذا للنموذج (وليس للحقول ، حيث ان الحقول ستحصل على بياناتها تلقائيا من مصدر البيانات): او جعفر 401.data2.zip

وعليكم السلام أخي أبو عزيز اهلا وسهلا بك في المنتدى المنتدى مليئ بالامثلة ، فرجاء عمل بحث قبل كتابة الموضوع اليك بعض الروابط لعملية الحساب ، والتي قد تحتاج إلى تعديل بسيط لتخدم غرضك: http://www.officena.net/ib/topic/60628-حساب-فرق-تاريخ-والوقت/ جعفر

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

وعليكم السلام نسخة الاوفيس التي تم تنصيبها هي 64بت ، بينما برنامجك يحتوي على مكتبات 32بت اقرا هذا الرابط لوسمحت: جعفر

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

السلام عليكم 1. نغير اسماء حقول الاسعار في الجدول للذكور والاناث ، ثم نضيف حقل للذين اعمارهم اقل من 20 سنة: 2. نعمل الاستعلام التالي ، والذي يرسل مجموعة من البيانات الى الوحدة النمطية Prices ، والتي تقوم بفرز الاسعار: 1. سعر النساء ، 2. سعر الرجال ، 3. سعر الاقل من 20 سنة ، 4. حقل الجنس من النموذج ، 5. حقل العمر من النموذج ، وهذه هي الوحدة النمطية التي تقوم بفرز الاسعار: Function Prices(f, m, b, s, a) 'f = female price 'm = male price 'b = below 20 years of age 's = sex 'a = age If a <= 20 Then Prices = b ElseIf s = "male" Then Prices = m ElseIf s = "female" Then Prices = f End If 'OR One_Line = IIf(a <= 20, b, _ IIf(s = "male", m, f)) End Function ولاحظ في نهاية الوحدة ، فقد جمعت/اختزلت جميع اسطر الكود الى سطر واحد ، والذي يمكننا استخدامه في الاستعلام مباشرة بدون الوحدة النمطية (سأتحدث عن هذه النقطة لاحقا)، 3. والنتيجة حسب الجنس والعمر في النموذج: لاحظ الحقل One_Line ، وهو الحقل المختزل من الوحدة النمطية ، 4. عملت هذا الاستعلام لتجعله مصدر بيانات حقل food في النموذج الفرعي ، ولا يوجد داعي لإستخدام الحقل Grouping: جعفر 400.معيار (Parameter) 2003.mdb.zip

السلام عليكم أخي محمد ممكن تعطينا مثال عن كيفية استخدام السعر1 و السعر2: 1. ذكر ، عمره اكثر من xxx 2. ذكر ، عمره اقل من xxx 3. انثى ، عمرها اكثر من xxx 4. انثى ، عمرها اقل من xxx جعفر

السلام عليكم أخي احمد بالنسبة الى التاريخ ، رجاء قراءة الرابط التالي ، فقط تستفيد منه اما بالنسبة الى الدالة DSum والتي تُستخدم بنفس شروط الدالة Dlookup ، فالرابط التالي قد يفيدك ايضا: جعفر

السلام عليكم ورحمة الله وبركاته عيدكم مبارك ، وايامكم سعيدة ، وتقبل الله الطاعات ان شاء الله جعفر

الملف الصحيح هو الملف الآخر الذي يتم انتاجه ، و الموجود في نفس المجلد: 377_2.txt

الغيت المعادلة السابقة ، ثم ادخلتهافي الحقل Total2 (للأسف ، بسبب الكلمات العربية فالمعادلة ترتيبها غير صحيح) : . والنتيجة . جعفر 374.8A13.accdb.zip

التقرير مبني على استعلام ، ويمكنك اضافة/تغيير اي شئ في الاستعلام ، وبالتالي تستطيع إظهاره في التقرير جعفر

وعليكم السلام استخدم النموذج Form1 لطباعة التقرير ، وكود الطباعة: Private Sub cmd_Clean_Click() File_From = Application.CurrentProject.Path & "\377.txt" DoCmd.OutputTo acOutputReport, "rpt_EMPDATAA", acFormatTXT, File_From, False File_To = Application.CurrentProject.Path & "\377_2.txt" Dim TextLine Open File_From For Input As #1 'open file for input Open File_To For Output As #2 'open file for output Do While Not EOF(1) 'Loop until end of file. Line Input #1, TextLine 'Read a line into variable. If Len(TextLine) > 5 Then 'if the line is NOT empty, write it to File_To Print #2, TextLine End If Loop Close #1 'Close file. Close #2 MsgBox "Done" End Sub جعفر 377.تحويل التقرير لتكست.accdb.zip