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

ابوخليل

أوفيسنا
  • Posts

    12,480
  • تاريخ الانضمام

  • Days Won

    233

كل منشورات العضو ابوخليل

  1. في جدول الموظفين اجعل الحقل Emp_Code هو مفتاحا اساسيا فقط يجب ان يكون رقما فريدا لا يتكرر في بقية الجداول الخدمية : يمكنك حذف حقل الترقيم التلقائي ويكفي ان تجعل الكود مفتاحا للجدول
  2. الجداول الرئيسية المتغيرة هي الجداول التي تدخل فيها البيانات بشكل مستمر مثل جداول الحضور والغياب والرواتب والاجازات والترقيات وغيرها من اوعية البيانات التي يحتاج الى حفظها للرجوع اليها عند الحاجة الجداول الخدمية الاخرى وان شئنا سميناها جداول تعريفية ويمكن اعتبارها ايضا رؤوس للجداول الرئيسة كجداول المهن والدرجات والوظائف .. الخ وهذه الجداول هي التي يفترق بها اكسس عن اكسل وهي التي بوجودها حكمنا على قاعدة البيانات بانها علائقية جدول tbl_emp يعتبر من الجداول الرئيسية الثابتة وهو لا يخرج من نطاق الجداول الخدمية حيث يتم ادخال البيانات فيه مرة واحدة ويمكن يطرأ على بعض حقوله بعض التحديثات في فترات متباعدة ، ولكن تبقى البيانات داخل هذا الجدول كسجل واحد
  3. هي الصورة نفسها التي ارفقتها لك
  4. هذا يعني انك لن تجرب حتى اشرح لك يمكن انها لا تعمل جرب اول .. فان عملت وقامت مقام RoundUp بكذا ينشط اخوك للشرح
  5. يوجد بديل استخدم هذا التعبير : EX : -Int(-[Average])
  6. السلام علكم كمشروع جماعي كان الافضل الا تعرض جميع هذه الكائنات كبداية تعرض الجداول الرئيسية ويتم النقاش حولها ثم يلحقها الجداول الفرعية ويتم القاش حولها ثم الجداول الخدمية ويتم النقاش حولها وهكذا خطوة خطوة وكائن كائن بنظرة خاطفة على الجداول بصورة عامة : الاعداد الفني جيد جدا ، العلاقات مبالغ فيها ، تصور انه يمكن اعداد البرنامج بدون اي علاقة بين الجداول العلاقة بين الجداول توضع غالبا لضبط والتحكم في الادخال وبصورة خاصة : ناخذ جدول tbl_emp 1- وجود اكثير من التكرار في الحقول كود الادارة .. اسم الادارة ، كود المهنة .. اسم المهنة ......... الخ يكفي في الجدول الكود فقط اما الاسماء فتجلب من الجداول الخدمية والا ما فائدة وجودها في قاعدة البيانات هذا مرور خاطف اتمنى ان يتسع صدرك لاراء اخوتك
  7. وما دمنا نعمل ضمن النموذج هذا كود يقوم بالبحث والمقارنة Dim i i = Time() mish_time.SetFocus DoCmd.FindRecord i, acEntire, False, acSearchAll, False, acCurrent, True If i = mish_time Then DoCmd.OpenForm "alarm" End If
  8. تفضل اخي الحبيب وجدت لك مثالين في المحاسبة من منتدانا هذا اتمنى ان تجد فيهما الفائدة محاسبة.rar
  9. Dim Stest As Byte Stest = Mid([Text2], 1, 2) هو متغير وهو يمثل الرقمين الاولين من كل باسوورد مدخل فعند ما يدخل المستخدم كلمة المرور وضعنا شرط وهو النظر الى stest فاذا كان 22 نفتح نموذج كذا واذا كلن 33 نفتح نموذج والا نفتح النموذج الثالث
  10. الطريقة مجربة وسليمة 100% ويمكن اخفاء النموذج المسؤول ليعمل بصمت في الخلفية تصور انه يمكن ايضا ان يرسل لك رسائل sms يذكرك بمواعيدك
  11. اطلعت على المرفق واول ملاحظاتي وهي التي يجب ان توليها عنايتك : الجداول وتصميمها 1- يجب كتابة اسماء الجداول بحروف انجليزية وعدم ترك مسافات فارغة بين الكلمات 2- يجب كتابة الحقول داخل الجداول بحروف انجليزية وعدم ترك مسافات فارغة بين الكلمات 3- التأكد الا تكون التسميات كلمات محجوزة ومعرفة في اكسس مثل date و Name .... وغيرها الملاحظات اعلاه تساعدك مستقبلا في كتابة الاكواد وفهمها بشكل صحيح لانه عند استخدام الحروف العربية تنقلب الاكواد رأس على عقب ويصعب فهمها اما الواجهات العربية فهي تكون في التسميات التوضيحية داخل الجداول او النماذج او التقارير 4 - اختيار النوع المناسب للحقل حيث رأيتك جعلت اغلب انواع الحقول = عملة والعملة فقط للحقل الذي يدخل فيه نقود ويجوز ان نستبدل نوع حقول العملة بارقام مزدوجة اما المعرفات فتكون اما ارقام او نصوص والخلاصة / لتعلم اكسس باحتراف وباقل مدة ممكنة يجب البدء من الجداول وهضمها جيدا ويجب تصور البرنامج كاملا من خلال الجداول سأبحث لك ان شاء الله في مكتبتي عن امثلة سهلة تساعدك
  12. تفضل هذا مثال حسب طلبك بالنسبة للارقام التي من خلالها يتم التفريق بين المستخدمين كــ 22 ، 55 .... وغيرها فهذه يمكن لبرنامجك ان يضيفها آليا عند التسجيل حسب النوع تخصيص المداخل متغير.rar
  13. وعليكم السلام ورحمة الله وبركاته حياك الله ابا يوسف معذرة فاني اعمل على اصدار اكسس القديم ولا يمكنني فتح الاصدارات الجديدة ولكني فهمت مشكلتك قم بالضغط على زر الشيفت واستمر ضاغطا وانقر على البرنامج لفتحه سيفتح على التصميم
  14. عمل عبقري متمكن استاذ كرار ولكن الى توافقني الى اضافة الاستعلام الجدولي مباشرة الى التقرير اسهل من هذه الاجراءت والكم من الاستعلامات وكما هو معلوم غالبا لا يستخدم الاستعلام في عرض البيانات مباشرة
  15. اكيد حسب الحاجة يمكن اظهار حجم قاعدة البيانات في شاشة المستخدم ويمكن عدم اظهار الحجم وبدلا من ذلك رسالة تنبه المستخدم ان عليه ضغط واصلاح القاعدة
  16. الضغط يتم باحد طريقين اما بفتح قاعدة البيانات / ادوات/ ضغط واصلاح قاعدة البيانات واما بواسطة الكود البرمجي للقاعدة البعيدة وهو ما بينته في مشاركتي السابقة بما يشبه هذا الكود DAO.DBEngine.CompactDatabase db_name, temp_name Kill db_name Name temp_name As db_name
  17. الشيء المهم والذي يجب ان يعرف : ان الضغط والاصلاح لقاعدة البيانات هو عبارة عن عملية يتم من خلالها خطوتين اثنتين وثالثة 1- نسخ القاعدة الى الذاكرة مع الضغط وتغيير الاسم 2- حذف القاعدة الاصلية 3- اعادة لصق ما في الذاكرة واعادة اسمها الاصلي ومن هنا يتبين خطورة العملية فيما لو لم يتم اخذ الاحتياطات اللازمة فالاولى عند تنفيذ العملية ان يسبقها مباشرة في اول الكود عملية اخذ نسخة احتياطية
  18. وعليكم السلام ورحمة الله وبركاته اهم نقطة في الامان وهي التي يجب ان تؤخذ في الاعتبار : أخذ نسخة من القاعدة قبل الاصلاح والضغط وايضا : - مراعاة ان تكون القاعدة الخلفية منفكة من الواجهات ويتحقق عدم الارتباط عند تخصيص نموذج البداية غير منضم لمثل هذا العمل - مراعاة تناسب حجم قاعدة البيانات مع ذاكرة الجهاز المتوفرة
  19. هذا حل ينزع الارقام عن يمين ويسار الفاصلة ثم يعيد ترتيبهما Expr1: Right([text3];Len([text3])-InStr([text3];"-")) & "-" & Left([text3];InStr([text3];"-")-1)
  20. كلامك مقبول .. ولكنها مكتوبة من قبل ونريد تعديلها برمجيا اما اخوي جعفر فشكرا على المبادرة وكأنك معي حين وضعت السؤال يوجد اشكالية بسيطة ويمكن اصلاحها خارج الكود وهي المسافات الخالية فبعض الحقول تحتوي على مسافة او اثنتين ولكن معظمها لا تحتوي على ذلك ، فيمكن غض النظر عنهافيمكن ازالة هذه المسافات بضغطة زر المهم الان ان تطبق اكوادك السابقة على الجدول e1 لانه يشتمل على نوعيات مختلفة من الارقام ولك حرية التعديل على اسم الحقل حيث يمكنك تغيير الحروف العربية
  21. السلام عليكم اخوتي الكرام : في المرفق جداول كل واحد منها يحتوي على حقل نصي وهو عبارة عن رقمين يفصل بينهما علامة السالب المسألة : ان تنسيق الارقام يظهر بشكل مقلوب مثال 7-1 والصحيح ان يكون 1-7 وبتوضيح اكثر : هذين الرقمين عبارة عن ارقام آيات أي من آية رقم 1 الى آية رقم 7 المطلوب تنسيق يتم تطبيقه على الجدول / الجداول db2.rar
  22. الآن عرفت ما تقصد في عرض البيانات الصق هذا الكود في محرر النموذج في مثالي السابق Private Sub Form_Current() Me.Str.Requery End Sub
  23. وعليكم السلام انت حاجتك في حقلين اثنين المعرف والنص وثانيا مادام المعيار موجود في الاستعلام فليس هناك حاجة لربط جدول آخر انظر التعديل الحاصل على مربع التحرير آمل ان تكون المسألة واضحة تماما Database2.rar
×
×
  • اضف...

Important Information