اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

zahrah2016

عضوية شرفية
  • Posts

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

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

السمعه بالموقع

46 Excellent

عن العضو zahrah2016

البيانات الشخصية

  • Gender (Ar)
    أنثي
  • Job Title
    MVP

اخر الزوار

بلوك اخر الزوار معطل ولن يظهر للاعضاء

  1. اخواني الكرام وعليكم السلام ورحمة الله وبركاته بارك الله بكم جميعا واخص بالذكر استاذي ومعلمي المهندس محمد طاهر فقد جمعتني به ذكريات سابقه على مدى 15 سنه من البرمجه كل الشكر والتقدير لكم جميعا على هذه الروح الطيبه والأخلاق العالية التي قل ما نجدها في اي محفل من محافل البرمجه استاذي الكريم محمد طاهر لطفاً لا أمراً اذا بالإمكان دمج الحسابين القديم مع الجديد فأكون في غاية الشكر والإمتنان والعرفان لشخصكم الكريم مع خالص الشكر والتقدير
  2. تفضلي أختي الكريمه : مي الكيال قاعدة بيانات بها نموذج وتفتح لك ملف وورد بناء على طلبك بالتوفيق اخي الغالي : جعفر السلام عليكم ورحمة الله وبركاته اتمنى ان تكون بصحة جيده انت وجميع الأخوة الكرام هنا في المنتدى اختكم : زهره محمد العبدالله ( أم عهود ) zahrah.rar
  3. تفضل اخي الكريم ملفك بعد التعديل الخطأ لديك انك استخدمت في معايير الإستعلام Combo6 بينما الصحيح الموجود في النموذج هو Combo8 db2_up.rar
  4. اخي الفاضل لا يوجد اي مشكلة بعد التعديل وحتى تتأكد بنفسك وتقطع الشك باليقين انظر هذا الملف zahrah.rar وهذا ملفك لم اقم بالتعديل عليه سوى ما قمت بإضافته في القائمة من النموذج الثاني db_201_up2.rar
  5. اخي الفاضل محمد الشاعر بالنسبة لموضوع ادخال البيانات فتستطيع انشاء زر امر لإضافة سجل جديد ولا يوجد به مشكله ومن ثم تستطيع ادخال البيانات اما اذا كنت تقصد في النموذج الفرعي السفلي للمواد لنفس الطالب فتستطيع ادخال المواد بدون مشكله . اما ما يخص الإستعلام عن طالب معين بالرقم فهذا ناتج عن الخصائص الموجوده في مربع التحرير والسرد حيث ان مصدر الصف يكون منشيء استعلام وليس استعلام حقيقي حسب العبارة التالية : SELECT tblStudent.ID, tblStudent.Id_ST FROM tblStudent; ثم نضع هذا الكود في حدث بعد التحديث لمربع التحرير والسرد الخاص برقم الطالب Private Sub NCombo_AfterUpdate() Dim rs As Object Set rs = Me.Recordset.Clone rs.FindFirst "[ID] = " & Str(Nz(Me!NCombo, 0)) If Not rs.EOF Then Me.Bookmark = rs.Bookmark End Sub وهذا الملف بعد التعديل za_StudentAndCourse_UP.rar
  6. اخي الفاضل اسامة السلام عليكم ورحمة الله وبركاته ايضا هذا حل أخر لضمان عدم التكرار بأي حال من الأحوال افتح الجدول في وضع التصميم ثم وهذا ملفك بعد التعديل za_db_up.rar
  7. بارك الله فيك اخي العمده على المشاركه اخي الفاضل سوالف ليل السلام عليكم ورحمة الله وبركاته تستطيع عمل ما تريد من خلال برنامج الأكسيس بدول الخروج منه فيوجد به معالج للتخطيطات مستقل عن برنامج الأكسيل راجع هذا الرابط لتعرف طريقة عمل التخطيطات بالشرح المصور http://www.arabteam2000-forum.com/index.php?showtopic=87442 اما اذا رغبت في عمل توصيل بين عدة نقاط مختاره فيمكن الرجوع الىهذا الرابط http://www.arabteam2000-forum.com/index.php?showtopic=99692 za_LINKING_POINTS.rar وعموما هذا هو البرنامج قمت بعمله لكي تتضح لك الرؤية والفكره في توصيل النقاط ملاحظة : يجب ان تقرأ تعليمات البرنامج الموجوده في زر أمر علامة الإستفهام ؟
  8. اخواني الكرام بارك الله فيكم جميعا على المشاركه وهذا أحد الحلول المقترحه za_StudentAndCourse.rar
  9. تفضل أخي الكريم قم بالتجربه الآن db_201_up.rar
  10. اخي الفاضل هل التقرير مبني على استعلام ام على جدول ياريت توضح اكثر ويفضل ان تضع برنامجك الخاص او مثال شبيه به ليتم التعديل عليه مباشرة وتضع به المطلوب .
  11. تفضل أخي الكريم البرنامج بناء على طلبك za_Report.rar
  12. أخي الفاضل السلام عليكم ورحمة الله وبركاته قد لا تكون هذه الميزه متوفره في مبع التحرير والسرد في برنامج الأكسيس لأن مربع التحرير والسرد ComboBox يعتمد على منشىء الإستعلام والذي بدوره معتمد على جدول معين وهو جدول Disease لهذا سوف تظهر كل الحقول مهما حاولت فهذه الخاصية غير متوفرة . ولكن يمكن التحايل على هذا الوضع بعمل التالي : 1. انشاء جدول جديد بإسم Disease2 مشابه تماما للجدول Disease ولكنه فارغ من البيانات . 2. نقوم بإنشاء استعلام الحاق بإسم مثلا qryDisease ومهمته هذا الإستعلام تكون في الحاق ما نقوم بإختياره كل مره من الجدول Disease الى الجدول Disease2 حسب معيار الشرط الموجود في جملة الإستعلام هذه INSERT INTO Disease2 ( DiseaseName ) SELECT Disease.DiseaseName FROM Disease WHERE (((Disease.DiseaseName) Like [forms]![main]![Disease])); حيث نلاحظ في المعيار انه يقوم بإلحاق العبارة او المرض المشابه فقط لمربع التحرير والسرد الذي اخترناه . الآن يجب ان نقوم بحذف هذا المرض من الجدول لأننا قد الحقناه الى الجدول الثاني Disease2 وستكون جملة الإستعلام الخاصة بالحذف حسب الشرط السابق DELETE Disease.DiseaseName FROM Disease WHERE (((Disease.DiseaseName) Like [forms]![main]![Disease])); هنا ايضا نلاحظ انه تم حذف المرض المختار من الجدول Disease نهائيا وهذا لا يهمنا في شيء طالما اننا قد قمنا بإلحاقه الى الجدول الثاني . الآن نقوم بالتجربه في النموذج وسنجد انه عند حدث بعد التحديث لمربع التحرير والسرد سيتم حذف كل مرض يتم اختياره حتى نكمل جميع الأمراض ولا يتبقى في مربع التحرير والسرد اي مرض لأنها الحقت الى الجدول الثاني . من خلال هذا الكود الذي يقوم بإستدعاء استعلام الإلحاق واستعلام الحذف معا وفي نفس الوقت Private Sub Disease_AfterUpdate() DoCmd.SetWarnings False DoCmd.OpenQuery "qryDisease" DoCmd.OpenQuery "qrydel" Me.Disease.Requery Me.Refresh DoCmd.SetWarnings True End Sub 3. الآن بقى عندنا خطوه وهي ارجاع ما تم الحاقه الى الجدول Disease2 الى الجدول Disease وستم ذلك من خلال عملية عكسية للحالة السابقة حيث نقوم بإنشاء استعلام الحاق من الجدول Disease2 الى الجدول Disease وحذف البيانات من الجدول Disease2 ليكون جاهزا لأي مهمه جديده . من خلال الإستعلامين التاليين INSERT INTO Disease ( DiseaseName ) SELECT Disease2.DiseaseName FROM Disease2; DELETE Disease2.DiseaseName FROM Disease2; والخطوة الأخيره هي ان نقوم بإنشاء زر امر لكي يقوم بإستدعاء هذين الإستعلامين من خلال الكود التالي Private Sub RestorTable_Click() DoCmd.SetWarnings False DoCmd.OpenQuery "qry2" DoCmd.OpenQuery "qry3" Me.Refresh End Sub قد تكون الطريقة طويله ولكنها تفي بالغرض ويتم عملها لمرة واحدة فقط اي انها الآن جاهزة للإستخدام ولا تحتاج الى اي تعديل وهذا ملفك بعد التعديل قم بالتجربه عليه من خلال اختيار جميع الأمراض مع ملاححظة وضع الـ SerialNumber قبل اختيار اي مرض لأنه سوف ينتقل مباشرة الى الجدول الثاني استمر في اكمال جميع الأمراض حتى النهاية ولا تحاول ضغط زر الأمر استعادة جدول الأمراض وانت في منتصف الأمراض الموجوده في مربع التحرير والسرد حتى لا تفقد البيانات من كلا الجدولين لذا يجب ان تقوم بإنتهاء كاملا من جميع الأمراض وحتى ترى ان مربع التحرير والسرد اصبح فارغا في هذه اللحظة تستطيع استعادة جدول الأمراض من جديد . za_Anamo_up.rar
  13. ايضا هذا مثال آخر على هذه العملية كنتي قد قمتي بطرحه في موضوع آخر حيث بمجرد ادخال ايام الخصم فإنه سيتم خصم 7 ساعات عن كل يوم وحفظ النتيجة في الجدول مع ملاحظة عدم تجاوز ايام الخصم لأن كل يوم يمثل 7 ساعات فمثلا لو كان لديك 20 ساعه في مجموع ساعات التأخر فليس من المعقول ان تقومي بحسم 5 أيام لأنها تمثل 35 ساعة لهذا يجب عدم تجاوز مجموع ساعات التأخر . zadb4_UP3.rar
  14. اخي الفاضل العمده اعلم ان الأداة هي DEMO ولكنها تعمل بشكل سليم ولا يوجد بها اي مشكلة وهذه الأداة خاصة بتغيير شكل الـ Skin فقط للنموذج . يوجد في الشركة Suite Pack او مجموعة كاملة لكل شيء مثل الأزرار والقوائم ومربعات التحرير والسرد وغيرها الكثير وحجمها تقريبا 145 ميقابايت اذا رغبت في انزال كامل المجموعة فهذه هي الروابط eXSuiteالرابط الأول او eXSuiteالرابط الثاني اما اذا رغبت في انزال مجموعات محدد فأختر منها من هنا http://www.exontrol.com/excustompack.jsp علما بأنها غير مجانية واذا رغبتها كاملة فعليك الدفع . اخي الفاضل ابو ليان هذه الأشكال خاصة بهذا البرنامج فقط حيث يوجد به برنامج داخلي يقوم بتعديل وتوليد هذه الأشكال بناء على طلبك ولكن عليك الدفع اولا لكي تحصل على نسخة كاملة منه .
×
×
  • اضف...

Important Information