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

ابوخليل

أوفيسنا
  • Posts

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

  • Days Won

    237

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

  1. ما دخل المعيار بالقيم ؟ من الاساس القيم في الجدول عبارة عن معرفات (ارقام) تم تغيير المعيار لتتغير طريقة عرض البحث اشرح شرحا وافيا .. لم افهم طلبك ماذا تريد بالضبط ارسم التقرير الذي تريد وسوف اقوم باعداده اكسس يعمل اي شيء يخطر ببالك
  2. راجع الجدول مرة اخرى ، كان يوجد به في المثال السابق بعض مربعات التحرير التي تظهر النصوص الآن لن تجد الا ارقاما .... فقط حقل البيان هو اليتيم ,, وحقل نعم لا ملحوظة : تم اصلاح البحث حسب الطلب Financial_db5.rar
  3. فقط من المعايير يمكننا جعل البحث حسب الحقل فقط ... ولا تظهر البيانات حتى يتم الاختيار .. وعند التحديث تختفي اولا نحن لا نتعامل في اكسس مع الجداول .. الجداول يجب ان تكون بعيدة عن المتناول الأصل في البرمجة الاحترافية ان تكون جميع البيانات المدخلة في الجداول عبارة عن ارقام تمثل معرفات لنصوص .. سواء كان نوعها نصي او رقمي ، من باب الأمان وايضا لسهولة وسرعة تدفق البيانات عند التعامل معها في الاستعلامات والتقارير على كل حال هذه الارقام كما ترى يتم ترجمتها لنصوص في النماذج والتقارير
  4. شباط اللي هو فبراير 3 سنوات يكون28 يوما والرابعة السنة الكبيسة يكون 29 يوما ... على فكرة هذه السنة كبيسة فالاسلم لك لسنوات قادمة اعتبار شهر فبراير 28 يوما حيث السنة القادمة لا يوجد يوم 29 في شهر فبراير سوف احاول اخراج النتيجة لتساوي 28 ملحوظة .. انت ذكرت ان النتيجة منضبطة تماما ولكن لي رأي آخر هي منضبطة في الشهور التي عددها 31 يوما فقط جرب على الشهور ذات الـــ 30 ووافني بالنتيجة من اجل ايجاد حل متكامل منضبط
  5. تفضل طريقة حساب البدو Dim m1, ym As Integer Dim idate As Date ym = (Me.iYear * 12) + Me.iMonth If Me.frame1 = 1 Then idate = DateAdd("m", ym, Date_1) Date_2 = DateAdd("d", Me.iDay, idate) ElseIf Me.frame1 = 2 Then idate = DateAdd("m", -ym, Date_1) Date_2 = DateAdd("d", -Me.iDay, idate) - 1 Else Exit Sub End If 30Dates.mdb
  6. ههههههههه صحيح كلامكك استاذ فادي ولكن مسألة الــــ 30 يوم حقيقية في بعض الانظمة ويؤكدون عليها والاخ احمد لو حسبها بالحسبة العادية الموظف سوف يخسر 8 ايام من استحقاقه انتظروني الحل يسير باذن الله سأوافيكم به
  7. آآآآآه يعني النتيجة تظهر في حقل التاريخ الثاني صحيح؟
  8. ايضا يمكن وضع قاعدة الجدول على قرص (بارتيشن) رئيسي يوجد غالبا في جميع الاجهزة مثل قرص C
  9. نعم يوجد بشرط تكون الجداول بجانب الواجهات في المجلد او في مجلد داخل مجلد قاعدة الواجهات تفضل من مكتبتي .. دعواتك لصاحب الوظائف Function BackFile() As String 'مسار القاعده الخلفيه واسم الملف الذي يحتوي على الجداول BackFile = CurrentProject.Path & "\BeBackDb.mdb" End Function Function CheckFile() As Byte 'فحص الملف اذا موجود On Error GoTo Error: Open BackFile For Input As #1 Close CheckFile = 1 Exit Function Error: Exit Function End Function Function AutoLink() If CheckFile <> 1 Then MsgBox "من فضلك ضع ملف القاعدة الخلفية كما هو مبين بالمسار أعلاه", vbOKOnly, BackFile DoCmd.Quit End If 'حذف الجداول المرتبطه On Error Resume Next Dim FrontObj As AccessObject, FrontDB As Object Set FrontDB = Application.CurrentData For Each FrontObj In FrontDB.AllTables If Left(FrontObj.Name, 4) <> "MSys" Then DoCmd.DeleteObject acTable, FrontObj.Name End If Next FrontObj 'الربط من جديد Dim BackObj As TableDef, BackDB As Database Set BackDB = DBEngine.Workspaces(0).OpenDatabase(BackFile, True, False) For Each BackObj In BackDB.TableDefs If Left(BackObj.Name, 4) <> "MSys" Then DoCmd.TransferDatabase acLink, "Microsoft Access", BackFile, acTable, BackObj.Name, BackObj.Name End If Next BackObj Set FrontDB = Nothing Set BackDB = Nothing 'النموذج الافتتاحي DoCmd.OpenForm "Form1" End Function
  10. ما المطلوب الموجود نموذج فيه : 1- ( اضف / اطرح ) ماذا تعني هذه ؟ 2- سنة / شهر / يوم اشرح المطلوب اذا ادخلت تاريخين ماذا اختار ؟ وما الناتج ؟ اعطني مثالا لنتيجة تاريخين من عندك
  11. اخي الكريم انا لم افهم مطلبك في اول مشاركة لك ولكني فهمت انك تريد تتعامل مع التاريخ على اساس الشهر 30 يوما اليك مثالا وجدته في مكتبتي ومن عملي اتمنى ان يحقق طلبك months30.rar
  12. افتح موضوعا جديدا في طلبك وارفق جداولك فقط ووضح ماتريد بالضبط ( الادخال/ والنتائج المستخرجة ) ... فمشاريع المدرسة متشعبة وكبيرة اخوانك هنا لن يألوا جهدا في مساعدتك وتوجيهك
  13. عملت لك نموذج بداية .. طبعا هو ابتدائي لتسهيل العمل على الخطوات القادمة .. وسيختلف في نهاية البرنامج حيث سنعمل منه واجهة جميلة - انظر وجرب نموذج البحث - انظر وجرب تصفية التقرير من نموذج التقارير 1- التصفية تتم من خلال 5 بنود .. الحساب ونوعه والصنف ... هذه اساسيات في تفصيل التقرير 2- السنة المالية وبند الصرف تظهر في رأس التقرير عند التصفية السبب : واضح ... انه يمكن تصفية بند واحد من بند 2 ولا يمكن العكس ........ جرب افتح التقرير بدون تصفية .. وجرب التصفية ببند او بندين او ثلاثة .... وهكذا ................ Financial_db4.rar
  14. احاول اعمل لك اول تقرير غالبا التقارير تأخذ في رأسها عناوين وشعارات تمثل المؤسسة يسميها البعض كليشة هل ترغب في رأس للتقرير مميز اذا نعم .. زودني ببيانات الرأس الثابتة التي تمثل مؤسستك ولا باس ان كان هناك شعار
  15. عليكم السلام ورحمة الله وبركاته "(" & [class_fsl] & "/" & [Class] & ")"
  16. طيب الجدول الجديد الذي فيه تم الصرف ما القصد منه ؟ لأنه يمكن اظهار النتائج بدون جدول يمكن انك تحتاجه في برنامجك القديم ولكن هنا لا اعتقد انك بحاجته
  17. نعم هو الصحيح يكتب المعرف وليس النص راجع مسمياتك تجد فيها اخطاء املائية كثيرة تم الاطلاع __________________________________ كنت اعمل على المرفق السابق واضفت نوع الحساب كنت ااحسبك تقصد بالنوع : جديد قديم هل ابقي عليه ؟؟ اذا نعم ما هو اسمه اذا جعلنا القائمة الجديدة هي التي اسمها النوع وياليتك تشرح لي النوع الجديد هذا ايش يعني ... وكأن له صلة بالارصدة
  18. لن يفيدكم الا مبرمج يعمل على مثل هذا على ارض الواقع وقام بالمحاولة بالربط وأعتقد انكم بحاجة الى اداة خارج اكسس كما هو الحال في المرحلة الأولى .. وتطويرها
  19. الموضوع قديم جدا وصاحبه لا يتواجد حاليا في المنتدى وهذا غير جيد يمكنك طرح موضوعك كموضوع جديد والاشارة الى هذا الموضوع او ادراج رابط له يغلق ،،،
  20. سوف اعملها لك كأنك بدأت تهتم .. وهذا سوف اضيفه لك كما ينبغي اعمله في نموذج البحث هذا .. لانه لم يتبقى بيانات في الجدول .. واحدة او اثنتان التاريخ موجود .. هل تقصد بين تاريخين ؟ لست بحاجة فأكسس يظهر لك جميع النتائج كتقارير ويمكنك تصديرها كــــ اكسل او صورة او pdf
  21. لماذا لم تعمله ؟.. انت جلبت النموذج من مرفق آخر فقط عندي احساس انك لا ترغب في الاستمرار اذا لم لم تكن نشيطا الى هذا العمل في رمضان يمكننا تأجيله . الآن تم ضبط نموذج البحث فائدة نموذج البحث للبحث عن سجل محدد ثم الذهاب اليه في شاشة اخرى تفصيلية ايضا اضافة الى ذلك هو للمدير نموذج تعديل وحذف اخي الطيب : يجب ان تدخل بيانات كافية متنوعة لسنوات متعددة حتى نتمكن من ضبط البحث في النموذج ثم ننتقل الى الخطوة التي تليها Financial_db2.rar
  22. ملاحظات اخرى : الحالة موجودة في النموذج ؟؟ ونحن استبعدناها في التصميم .. حيث لا وجود لها في الجداول وسؤال عن المبلغ .. حقل المبلغ ما الذي يظهر فيه ؟؟ حيث لدينا : دائن ومدين ورصيد
  23. انت ذكرت تريد نموذج تعديل وفي المرفق نموذج للبحث والتعديل .. الى هنا تمام ولكن استوقفني خانات التعديل والاضافة والمنع ... وايضا يوجد حقل اسمه حذف لا اتصور ان مكان الخانات هذه ظاهرة امام الجميع .. حيث هذه الصلاحية يجب ان تكون آلية حسب المستخدم ايضا الحذف يمكن للمدير فقط النقر المزدوج على سجل محدد وتظهر له رسالة اذا يرغب في الحذف اما الإضافة فغير وارد في هذا النموذج لأن الاضافة تتم في نموذج الادخال بمعنى ان نموذج البحث هذا خاص بالبحث والاطلاع فقط .. ويمكن من خلاله عرض تقارير وطباعة ونحو ذلك التعديل او الحذف من صلاحيات المدير هل كلامي اعلاه صحيح ؟؟؟ .. واذا لديك ملاحظة او تعليق هاتها .
  24. وازيد من الشعر قصيدة وليس بيتا التصميم كله خطأ انت بحاجة لثلاثة جداول فقط جدول الجهات : يشتمل على : معرف الجهة / اسم الجهة جدول الموظفين : يشتمل على معرف الموظف / اسمه / وظيفته / عنوانه / الهاتف / الخخ ............... جميع بياناته الثابتة جدول الحركة او العمليات ويشتمل على فقط : 1- معرف الموظف (مربع تحرير ) 2- معرف الجهة ( مربع تحرير ) 3- دائن 4- مدين 5- التاريخ لست بحاجة الى علاقات بين الجداول ... اي ممنوع تعمل علاقات بين الجداول
×
×
  • اضف...

Important Information