• الإعلانات

    • فيصل الحربي

      تسجيل عضوية جديدة في المنتدى   01/31/2016

      السلام عليكم ورحمة الله وبركاته  عزيزي العضو الجديد :  حاليا رسالة الإيميل لتأكيد صحة إيميلكم تذهب للبريد العشوائي ( جاري حل المشكلة )  فإذا لم تجد رسالة التحقق من إيميلكم في صندوق الوارد لديكم إتجه للبريد العشوائي ( JUNK)  وقم بتفعيل إشتراككم من هناك   

jjafferr

اعضاء
  • عدد المشاركات

    1,864
  • تاريخ الانضمام

  • تاريخ اخر زياره

كل شيء نشر بواسطة jjafferr

  1. السلام عليكم ورحمة الله وبركاته   بعد رجوع المنتدى وتفعيله ، لم اعد استلم اي اشعارات (على الايميل) من المنتدى عندما يوضع احد الاخوة مشاركة في موضوع اشارك فيه    :( وقد دققت في اعدادات لوحة التحكم الخاصة بي ، ولكني لم اجد المشكلة    :( مع العلم بأن آخر ايميل وصلني كان بتاريخ 11 اغسطس.   والشئ الوحيد الذي اعتمد عليه الآن هو زر F5 لتحديث الصفحة الرئيسية  :)   رجاء الافادة لو سمحتوا ، ولكم شكري الجزيل    :)   جعفر
  2. الحمدلله على السلامة اختي أم عهود :)     جعفر
  3. السلام عليكم ورحمة الله وبركاته   اخواني/اخواتي :)   رأيت الكثير من الاسئلة حول تصدير بيانات الاكسس الى الاكسل ، وكل سؤال يختلف عن غيره بطريقة او اخرى ، فحبيت ان اضع بين يديكم برنامج اشتغلت عليه ، واتمنى من الله سبحانه وتعالى انه يقدر يخدم الكل :)   البرنامج سهل الاستعمال ، فكل المطلوب في الواجهة ، ولا تحتاج الذهاب للكود :)   اولا: الواجهة:   1. تختار من مربع السرد ، جدول او استعلام ، 2. على اساس الاختيار في رقم 1 ، ستظهر لك قائمة باسماء الجداول او الاستعلامات في برنامجك ، 3. اسم ملف الاكسل المراد حفظه به ، ومجلد التخزين ، فتلقائيا يكون في نفس مجلد البرنامج ، 4. هنا تكتب اسم صفحة الاكسل التي تريدها (انظر الصورة في الاسفل)   ** تستطيع ان تصدر اي عدد من الصفحات الى اكسس (طبعا التصدير يكون باستعمال البرنامج عدة مرات ، في كل مرة تستخدم اسم صفحة جديدة) ، ** تستطيع ان تصدر بيانات جديدة الى نفس الصفحة في اكسس (طبعا التصدير يكون باستعمال البرنامج عدة مرات ، في كل مرة تستخدم *الادخال من خانة* اسفل الخانات الموجودة في الاكسل) ، 5. تستطيع بدء تصدير البيانات الى اي خانة في اكسل مثل A2 او C5 او اي خانة اخرى ، ** تستطيع ان تصدر بيانات جديدة الى نفس الصفحة في اكسس (طبعا التصدير يكون باستعمال البرنامج عدة مرات ، في كل مرة تستخدم *الادخال من خانة* اسفل الخانات الموجودة في الاكسل) ، 6. تستطيع ان تحفظ ملف الاكسل بالصيغ التاليه: "xls"  او "xlsx" او  "xlsm" او  "xlsb" او  "csv" او "txt" ، والصيغتين الاوليتين هما الاهم ، والصيغتين الاخيرتين بهم قيود معينة ، 7. تستطيع ان تختار المجلد الذي تريده ، مع كتابة اسم الملف المناسب لك (انظر الرقم 3 اعلاه) ، 8. تستطيع تصدير البيانات مع اسماء الحقول (في الاكسس) ، وتستطيع تصدير البيانات مع عناوين/مسميات الحقول (في الاكسس) ،   نلاحظ اعلاه ، بان الجدول elemnts لا يحتوي على عناوين/مسميات الحقول بالعربي ، بينما الجدول elemnts2 يحتوي عليها ،   وتستطيع تصدير البيانات فقط بدون اسماء الحقول ، 9. تستطيع ان تصدر البيانات الى ملف اكسل فيه بيانات سابقة ، وهنا تستطيع الاستفادة من الارقام 4 و 5 اعلاه ، او ان تحذف ملف الاكسل الموجود حاليا بنفس الاسم ، وتبدأ تصدير ملف جديد ، 10. بعد تصدير البيانات الى اكسل ، هل تريد إحتواء وتوسيع كل الاعمدة فيه ، حتى ترى كل البيانات بدون الحاجة الى توسيع كل عمود على حدة ، او لا تريد توسيع الاعمدة. 11. الزر الذي يقوم بعملية تصدير البيانات الى اكسل ، حسب الاختيارات اعلاه ، مع ملاحظة: يجب تعبئة الحقول داخل المربعات الحمراء ، اما بقية الحقول فإختيارية ، 12و 13. لجعل هذا البرنامج يعمل على اي من برامجكم الحاليه ، يجب تصدير النموذج frm_Export_to_Excel و الوحدة النمطية fFolder_Dialog اليها.   طبعا هناك أفضلية تصدير البيانات من الاستعلام ، حيث تستطيع ان تتحطم بالبيانات المطلوب تصديرها.   ملاحظات؟ اخطاء/عطل؟ إضافات؟   انا في الخدمة ، قدر المستطاع :)   جعفر Export_to_Excel.zip
  4. الصندوق

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

    وعليكم السلام اختي :)   انا عملت استعلام آخر باسم qry_Sum_uq2 ، وجعلته مصدر بيانات النموذج :) وللعلم ، فان بعض الفواتير تتكرر بنفس الرقم ، واحدة للقبض باسم شخص واخرى نقدي باسم شخص آخر (وهنا كذلك اعتقد بان هذا يصير بسبب عدم تنظيم البيانات بطريقة صحيحة :( )     اما بالنسبة الى فتح النموذجين sell  و bonds ،   فقد غيرت كود فتح النماذج من نموذج 2 الى: If Me.type_of_pay = "قبض" Then DoCmd.OpenForm "bonds", , , "[bonds_number]=" & Me.SellBillNum, acFormReadOnly, , "I_want_Read_Only" Else DoCmd.OpenForm "sell", , , "[SellBillNum]='" & Me.SellBillNum & "'", acFormReadOnly, , "I_want_Read_Only" End If لاحظي آخر السطرين ، فقد مررت قيمة I_want_Read_Only في الامر Me.OpenArgs الى النماذج عند فتحها (واذكرك بان النموذج للقراءة فقط ولايمكن تغيير او اضافة سجل فيه) ،   وعليه ، فكود حدث فتح النماذج اصبح يبحث فيما اذا هذه القيمة موجودة في الامر  Me.OpenArgs ، فاذا وجدت ، لم يفتح سجل جديد ، وإلا ، فهو يفتح سجل جديد : If IsNull(Me.OpenArgs) Then DoCmd.GoToRecord , , acNewRec End If جعفر 269.2.الحركة.accdb.zip
  6. ممكن انك تصطاد زر Enter بمعلومات من هذا الرابط : http://arabteam2000-forum.com/index.php/topic/293234-عند-الضغط-على-زر-enter-يتم-حفظ-البيانات-في-الاكسس/?p=1397918   واعمل فيه ما تشاء :)     جعفر
  7. الصندوق

    وعليكم السلام اختي :)   اذا نظرتي في صورة الاستعلام اللي ارفقتيها بمشاركتك الاخيرة ، ستجدين بان اسم الحقل PaiedMoney ، بينما في ارسال المعلومات ، انت ارسلت الحقل Payment ، اي انك عملتي نسخ من الاستعلام السابق ونسيتي تغيري اسم الحقل :(    انا لاحظت وجود الكثير من السجلات الفاضية في التقرير (اللي معلوماتها صفر) ، واللي قد يكون سبب وجودها هو انك لم تدخلي المبالغ والعملة في جميع السجلات (وهاي معناه ان جميع التجارب اللي نقوم بيها الى اليوم قد يكون فيها إشكال :( ) ، لهذا ، عملت حقل اخير في الاستعلام ، لا يظهر هذه الارقام في التقرير :)     جعفر 331.3.y - Copy.accdb.zip
  8. وطريقة اخرى :)   اذا كانت توجد قيمة في الحقل Text1 ، فلا تخرج من الحقل اصلا: Private Sub Text1_Exit(Cancel As Integer) If Len(Me.Text1 & "") <> 0 Then Cancel = True End If End Subجعفر
  9. حياك الله :)       الرابط التالي يعطينا تسلسل الحدث بالنسبة للنموذج ، والكائنات في النموذج ، والسجلات في هذه الكائنات: http://office.microsoft.com/en-za/access-help/order-of-events-for-database-objects-HP005186761.aspx     لو انك فكرت في الموضوع ، لوجدت ان ما يفعله اكسس صحيح: 1. الحدث الذي تم استعماله (او اي حدث آخر) يحصل عندما يتم تغيير القيمة ، ولكننا لم نغادر الحقل ، 2. والطريقة الوحيدة التي يمكننا ان نعود للحقل الذي كنا ، هو عندما نفارق هذا الحقل ونذهب الى حقل آخر (الى الحقل التالي مثلا) ، لذا ، يمكننا استخدام هذا الكود: Private Sub Text2_Enter() If Len(Me.Text1 & "") <> 0 Then Me.Text1.SetFocus End IfEnd Subفبمجرد ان ندخل الحقل التالي (اي نكون قد خرجنا من الحقل الاول) ، فالكود يستطيع ان يرجع الى الحقل الاول (واذا لاحظت ، ستجد باننا استعمالنا طريقة الكود في مشاركتي الاولى) ، حيث: 1. ذهبنا الى حقل آخر (عن طريق زر Tab او Enter (اي ليس بالكود)، 2. ثم رجعنا الى حقلنا السابق بالكود  :)     جعفر
  10. عرض الصور في التقرير

    وعليكم السلام :)   1. اعمل التقرير بجميع الحقول ، ولكن بدون Employee Information Tab  2. في النموذج عندك كود الصورة في الحدث "الحالي" On Current ، اعمل نسخة من الكود وضعها في التقرير في الحدث:   Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)     جعفر 355.تقرير_صوري.mdb.zip
  11. وعليكم السلام :)   ما تستطيع ان ترجع له مباشرة ، لازم تروح لحقل آخر ثم ترجع له : Private Sub Text1_AfterUpdate() 'DoCmd.GoToControl ("Text1") If Len(Me.Text1 & "") <> 0 Then Me.Text2.SetFocus Me.Text1.SetFocus End If End Subجعفر
  12. وعليكم السلام اخي جعفر :)   للأسف لا يمكن ذلك ، وذلك لأن التقارير لديها تنسيق يختلف يإختلاف ذوق المبرمج :)   نعم هناك اوامر جاهزة في الاكسس لتصدير التقارير الى الاكسل ، ولكنها في الكثير من الاحيان لا تحترم تنسيق التقرير :(     جعفر
  13. حياك الله :)   يعني هل افهم من ردك ان الموضوع تم السيطرة عليه؟ في النموذج والتقرير؟     جعفر
  14. السلام عليكم أخي رمهان :)   اسمح لي اطلعك على احد اسراري :)   في الكثير من المشاريع التي اقوم بها ، استخدم جدول الاشهر التالي:       فحسب طلب المستخدم ، سواء تاريخ عربي او انجليزي او عراقي (وما اعرف ايش اسمه بالضبط) ، فاقوم بعمل استعلام ، اربط هذا الجدول بذلك الجدول عن طريق حقل months_Numbers او months_Digits ،  وبالتالي ، ادخل في الاستعلام حقل الشهر الذي يريده المستخدم ، واستعمل هذا الحقل في النموذج او التقرير :)   هدفي من كلامي السابق هو: اعمل جدول ، خلي فيه جميع الحقول اللي تعتقد ان المستخدم قد يستخدمها (نعم/لا و ... ) ، وبهذه الطريقة ، تصبح طريقتك عالمية :)   وانا في الخدمة :)     جعفر Months.zip
  15. وعليكم السلام :)   رائع أخي رمهان ، فكرة جميلة :) والاحلى فيها التنسيق الشرطي :)   ولكن سؤالي هو كيف استطعت الحصول على علامة الصح من Fonts ؟ وطبعا لو ان الجدول به حقل نعم/لا ، لأمكن استعمال طريقتك عالميا ، حيث انك تغير نعم بـ -1 ، ولا بـ صفر :)       جعفر
  16. وعليكم السلام :)   بما ان ارفاق الملفات اصبح يأخذ وقت (بعد انقطاع المنتدى في شهر 8 ، فصرت احاول اتفادى رفع الملفات ، واعوضوها بالمقتطفات ، وصاحب السؤال يجمعها :) )   تفضل اخي رمهان ، مرفق البرنامج :)     جعفر 364.mtEST.accdb.zip
  17. وعليكم السلام :)   تفضل :) هذا الرابط يناقش طلبك ، وبه اكثر من حل :) http://arabteam2000-forum.com/index.php/topic/280385-مساعدتي-في-عمل-تقرير-مثل-التقرير-الموجود-في-الصو/?p=1351272     جعفر
  18. السلام عليكم اخي جمال :)   اعتذر اني ما شرحت طريقة حلّي بالكامل :(   الفكرة انه نضع التسلسل في الجدولين (كما عملت انت في آخر مرفق ، لكنهم الاثنين يجب ان يكونوا ارقام) ، ثم نعمل استعلام ، نربط فيه الجدولين بواسطة التسلسل qry_marker_Eval ، بحيث نحصل على بيانات الجدولين ، نستخدم qry_marker_Eval كمصدر بيانات للنموذج frm_marker_Eval ، واللي تقدر تعمل فيه اللي تريد :)  (واللي يستبدل النموذج "بطاقة تقييم الانشطة") ، ومن هنا ، تقدر تعمل نسخة من النموذج بعد تعديله وتضبيطة ، وتعمله تقرير :)   الفكرة ببساطة هي ، عكس اعمدة النموذج "بطاقة تقييم الانشطة" مع صفوفه ، يعني اللي كان افقي يصبح عمودي ، واللي كان عمودي يصبح افقي :)     جعفر 362.التقييم.mdb.zip
  19. اخي ابولميس :)   اخي رمهان ارفق لك ملف ، جربه :)       جعفر
  20. حياك الله أخي رمهان :) صدقني اني فتشت على حقل السنة، ولكني لم أجده :( جعفر
  21. حياك الله أخي رمهان :) صدقني اني فتشت على حقل التاريخ، ولكني لم أجده :( جعفر
  22. أخي الكريم :) احذف هذه الحقول التي تحتوي على معلومات غير متكررة من الاستعلام، ثم استعمل المجاميع أو الإجمالي :) انظر للصورة في الرابط التالي، حتى تعرف شكل الزر في الاستعلام : http://www.opengatesw.net/images/tutorials/Access-Aggregate-Query-Sum.png جعفر