اذهب الي المحتوي
أوفيسنا

jjafferr

أوفيسنا
  • Posts

    10011
  • تاريخ الانضمام

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

  • Days Won

    408

كل منشورات العضو jjafferr

  1. ما هو اصدار الاكسس الذي تشتغل عليه؟ اذا عندك 2007 فما فوق ، فالموضوع اسهل ، اما اذا اقل من 2007 ، ففيه صعوبة!! جعفر
  2. تفضل تختار الشهر من النموذج ، وتفتح التقرير: . واذا لا تريد الايام التي لا علاقة لها بالشهر الذي تم اختياره ، فما عليك إلا وضع الشرط التالي في الاستعلام Q: . والعقل المدبر للعملية كلها هي هذه الوحدة النمطية: Function Count_Days(S As Date, E As Date, M As Date) As Integer 'S = Det_A = Start Date 'E = Det_B = End Date 'M = Month of Report Dim LastDay_S, FirstDay_E, LastDay_M As Date LastDay_S = DateSerial(Year(S), Month(S) + 1, 0) FirstDay_E = DateSerial(Year(E), Month(E), 1) LastDay_M = DateSerial(Year(M), Month(M) + 1, 0) If Month(S) = Month(M) And Month(E) = Month(M) Then 'M month = month for both S and E Count_Days = DateDiff("d", S, E) + 1 ElseIf Month(S) = Month(M) And Month(E) <> Month(M) Then 'M month = month for S only Count_Days = DateDiff("d", S, LastDay_S) + 1 ElseIf Month(S) <> Month(M) And Month(E) = Month(M) Then 'M month = month for E only Count_Days = DateDiff("d", FirstDay_E, E) + 1 Else 'out of boundries Count_Days = 0 End If End Function . جعفر 513.MM.mdb.zip
  3. السلام عليكم وبعد إذن اخوي أبوخليل ، أرجو من اخي سامي إرفاق برنامجه ، وخلينا نشوف كيف نقدر نطبق فكرة اخوي أبوخليل ، بالتنسيق والمسافات اللي تريدها جعفر
  4. هاي مب مشكلة ، ولكن يجب ان نعرف تسلسل الصورة ، وإلا كيف يمكن ان نعطيها رقم!! اذا ممكن ان تعمل نموذج في الاكسس ، مثل اللى عملته في الشرح ، فيه اسماء الصور ، فعليه الموضوع بيكون اسهل ، لي وللمسؤول جعفر
  5. وضحت الفكرة ، اعطني شوية وقت وارجع لك ان شاء الله جعفر
  6. اشكرك على كلماتك الرقيقة الظاهر المعلومة بيننا لم تصل بالطريقة الصحيحة ، لي او لك احاول شرح طريقتي مرة ثانية: نستطيع ان نستخدم مسار حقل الصورة ، من الجدول ، او من الكود (لأن المسار واسم الصورة لن يتغير بالخطوات التالية) ، عند تغيير الصورة (لاحظ لم اقل عند تغيير اسم الصورة او المسار) : يختار المسؤول اسم الصورة اللي يريد تغييرها ، فلتكن لحم5 مثلا ، والتي تتواجد الان في المجلد icons ، فتنفتح له نافذة تصفح الملفات/المجلدات ، ويستطيع المسؤول اختيار اي صورة من اي مجلد ، فيختار مثلا الصورة New_BBQ.jpg في مجلد Downloads ، فيقوم الكود بـ: حذف الصورة لحم5 الموجودة حاليا في المجلد icons ، نسخ الصورة New_BBQ.jpg من مجلد Downloads ، إلى المجلد icons ويغير اسم الصورة الى لحم5 . بهذه الطريقة ، الخطوة #1 اعلاه ، لم تتغير ، وانما تم تغيير الصورة فقط ، وبقيت جميع الصور بأسمائها في المجلد icons ان شاء الله اكون وُفقت في الشرح هذه المرة جعفر
  7. وعليكم السلام ترتيب التنقل من حقل الى آخر في الحقل ، مرتبط بقيمتين لكل حقل: Tab Index ، اي تسلسل اي حقل تقف عليه الايقونه عند الضغط على Tab/Enter ، والتسلسل يبدأ بالرقم 0 ، Tab Stop ، وفيه خيار نعم اذا اردت الايقونه التوقف على هذا الحقل ، او لا ، . عادة ، جهاز الباركود يُدخل قيمة الباركود في الحقل ، وبعدها وتلقائيا يعطي امر Tab/Enter ، حتى تنتقل الايقونه الى الحقل التالي ، لذلك ، يجب ان تكون Tab Index الحقول مرتبه تصاعديا ، ابتداء من حقل الباركود ، واذا اردت الانتقال من حقل الباركود الى سجل جديد لحقل الباركود (يعني لا تتوقف الايقونه على اي من الحقول الاخرى) ، فاجعل Tab Stop حقل الباركود نعم ، وجميع الحقول لا. جعفر
  8. وعليكم السلام اخوي وائل ماشاءالله عليك ، شرح كافي ووافي ، وياريت كل اللي يضعون اسئلتهم في المنتدى يشرحوها مثلك ، لو لقوا الاجابة اسرع عندي التعليق التالي على شرحك: - في أي حال ، اذا أردت إضافة صورة رابعة ، فيجب عليك دخول التصميم ، - إذن نحن لا نتكلم عن الإضافات المستقبلية ، وإنما نتكلم عن تغيير الصورة فقط ، - في هذه الحالة ، انا اقترح ان نعمل نموذج خاص لتغيير الصور ، ويختار المسؤول اسم الصورة اللي يريد يغيرها ، ثم تفتح له نافذة تصفح مجلدات/ملفات الوندوز ، ويختار الصورة الجديدة ، فيقوم البرنامج بنسخ الصورة وتغيير اسمها إلى المجلد icons ، ويحذف الصورة القديمة. شو رايك؟ جعفر
  9. وين يا سلمان ، ننتظر المرفق نشتغل عليه جعفر
  10. وعليكم السلام اخوي وائل انا فهمي بطيئ بدون شرح تفصيلي ومثال جعفر
  11. السلام عليكم اخي الغائب محمود وحشتنا يا راجل ، وحتى البدر له طلّه مرة في الشهر ، بس انت بقيت اغلى منه ، ولك طلّه متى ما تحب طبعا ممكن عمل اللي تريده بالكود ، بس عندي لك حل تاني اسهل: ايه رايك في تقريرك الحالي ، نعمل خانه "عدد ايام الإجازة" لكل سجل ، وتحت ، نعمل مجموعهم جعفر
  12. السلام عليكم احببت المشاركة في هذا الموضوع ، لأني قمت بمثل هذا العمل مسبقا في بعض برامجي طبعا قمت بعمل بعض التغييرات في الجداول!! النموذج التالي يقوم بكل العمل: . عمل النموذج اسهل من شرحه 1. حقل تاريخ الاجازة ، 2. حقل سبب الاجازة ، 3. حقل نوع الاجازة ، 4. زر لتصفية البيانات 1 و 2 و 3 و 6 ، 5. الخورج من النموذج ، 6. في جدول Emp ، اضفت حقل اسم القسم الذي يشتغل فيه الموظف ، لذا هنا نستطيع ان نختار القسم ، 7. وعند الضغط على الزر عرض ، فسترى اسماء جميع موظفي القسم في الحقل 9 ، 8. زر تصفية الاسماء التي تم اختيارها ، 9. يمكن اختيار كل موظف على حدة ، بكتابة اسمه ، وتلقائيا سترى القسم الذي يعمل فيه (فقط لعدم اختيار الموظف الخطأ) ، 11. يمكن حذف اي سجل من السجلات المختارة ، 10. فقط عند الضغط على هذا الزر ، يتم ادخال الاجازات الى جدول الاجازات ، وإلا ، فجميع السجلات تظل في الجدول المؤقت tbl_Temp ، والذي تُحذف سجلاته تلقائيا عند الخروج من النموذج ، جعفر 510.اضافة اكثر من موظف في ان واحد.accdb.zip
  13. وعليكم السلام تفضل هذا الرابط: http://www.vbaexpress.com/kb/getarticle.php?kb_id=468 و نفس الحل ، ولكن بشرح اكثر https://support.microsoft.com/en-us/kb/291295 جعفر
  14. وعليكم السلام قمت بالاجابة على هذا السؤال في منتدى الفريق العربي للبرمجة سابقا ، وهذا هو الرابط: http://arabteam2000-forum.com/index.php?/topic/292971-هل-من-طريقة-لإدراج-صورة-بدون-خلفية-في-التقرير/ جعفر
  15. حياك الله أخوي صالح واااااااااااااااااااااااااااااااااااااااااااااو جد رهيبه القاعده من 36 ميقا الى 5 وحياك الله أخوي بدر والميزة الموجودة في هذا البرنامج ، هو انك تستطيع ان تجعل البرنامج يشتغل: 1. بأمر من سطح المكتب والبرنامج مغلق ، حيث تعطي الامر من Commandline بفتح الاكسس على الماكرو Execute مباشرة ، او 2. بأمر من اي من برامج الاكسس ، او 3. تستطيع ان تضع وقت معين في Windows Schedule ، بحيث يشغل البرنامج في وقت معين ، تلقائيا ، كل يوم بس اولا يجب تعديل الماكرو Execute في البرنامج اعلاه ، حتى يغلق البرنامج تلقائيا بعد الانتهاء من عمله جعفر
  16. على العموم ، اذا الله كتب لنا بالأخرى ، بنحتاج لكم شباب تشاركونا في الفرحة
  17. الله يخليك ، لا تخلي زوجتي تشوف هالاسم ، وإلا بتعتقد ان موسى من زوجه أخرى جعفر لا ، وانما الطريقتين ستظهران الحرف والرقم عند استعمال الحقل في اي مكان جعفر
  18. حياك الله 1. الحقل رقمي ، والتعامل مع الحقل دائما كأنه رقم ، اما إضافة الحرف M فهو للتنسيق فقط ، ولكن الرقم مع الحرف يظهرون عند استعمال الحقل ، 2. الحقل نص (انا لم اغيّر في الجدول ، وانما غيّرت المعادلة فقط) ، والحرف M هو جزء من الحقل ، وعند استعمال الحقل ، فان الرقم والحرف سيظهرون مع بعض ، ولا علاقة للتنسيق في هذا الحقل جعفر
  19. السلام عليكم ومشاركة مع اخواني ، اعرض عليك هذا الكود ، وتستغني به عن الوحدة النمطية ، ولكن الشرط ان لا تكون هناك سجلات في الجدول ، وتبدأ معه سجل بسجل: Me.حاسب = "M" & DCount("*", "Test") + 1 جعفر
  20. عفوا أختي ، لا يمكن عمل أي نموذج/برنامج بهذه الطريقة ، لذا ، فرجاء إرفاق برنامجك ، وتوضيح ما تريدين الوصول إليه بمثال من برنامجك جعفر
  21. السلام عليكم اخي بحار الاكسس اشكرك على روح التعاون ، ولكن ، الهدف من المنتدى هو تثقيف وتعليم اعضاء المنتدى بخبرات الخبراء أمثالك فياريت تفيدنا بأفكارك في كيفية عمل مثل هذا البرنامج ، والقيام به من خلال مشاركاتك هنا مع صاحب الموضوع ، حتى يستفيد الجميع من هذه الأفكار ويتسع ادراكهم بالخطوات والتحليل جعفر
  22. السلام عليكم أختي مايا ليس هناك داعي لفتح سؤال جديد لموضوع تتم فيه المناقشة ، وكما لاحظت من المشاركات ، فالاخوة شفان ورمهان قد قاموا بطلب الاستفسار منك في نفس اليوم الذي وضعتي فيه السؤال ، اي قبل 8 ايام . جعفر
  23. وعليكم السلام أختي ، واهلا وسهلا بك في المنتدى نعم يمكنك عمل ما تفضلتي به في الاكسس ، وكما يمكنك جلب بيانات سابقة اذا كانت على الاكسل مثلا ، ولكن وكما تفضل أخي شفان ، يجب ان يكون عندك تصور واضح لطريقة عمل البرنامج ، وتوجد لدينا برامج اكسس بها مئات الآلاف من السجلات ، وهو في الخدمة لسنين عديدة جعفر
  24. السلام عليكم يمكنكم الاستفادة من البرنامج في هذا الرابط: . من هذا النموذج: . والذي استخدمت فيه نوعين من الكائنات لعرض الصور/ملفات pdf ، وبرمجيا ، وحسب نوع الملف ، كنت اخفي الكائن الاخر ، واعرض الصورة على كائن الصور ، بينما اعرض ملفات pdf على كائن متصفح الانترنت IE (والذي تستطيع ان تعرض عليه معظم الملفات الاخرى ، غير الصور) جعفر
×
×
  • اضف...

Important Information