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

kanory

الخبراء
  • Posts

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

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

  • Days Won

    138

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

  1. بداية اعتذر من استاذي الفاضل في الاستعجال في الرد وعدم انتظار رده @ابو البشر ولكن لي ملاحظة : استخدام مسميات الحقول بالعربية عمل نموذج للترويسة في التقرير ... كان بامكانك جعل نفس الترويسة عن طريق تقرير فرعي على كل حال أنظر المرفق واعلمنا بالنتيجة ..... خط سير.mdb
  2. بالنسبة لعبارة مخزن تجدها في التقرير اما رقم ١ و ٢ و٣ تجدها في الاستعلام لاحظ الصور ... الشرح فيها
  3. هذا طلبك الاول ... قي المرفق ... انظر الصورة .... هذه النقطة معتمده في الاساس عل الاستعلام الذي انت فعلته .... انظر الاستعلام ومن اين اتت هذه المسميات لأنها موجودة في برنامجك اساسا ‏‏DATA144 - kanory.mdb
  4. مشاركة من الاساتذه : طريقة اخرى تمكنك من اختيار مخازن بعينها لتظهر في التقرير ..... جرب ووافينا بالنتيجة ... ‏‏DATA144 - kanory.mdb
  5. جرب هذا الكود ... Like "*" & [Forms]![SearchF]![k].[Text] & "*"
  6. اخي الكريم منكم وبكم نتعلم الابداع
  7. وهذه طريقة اخرى مشاركة مع استاذي الفاضل @kha9009lid وهي عن طريق انشاء جدول وفرز عمليات كل الموظفين من الجدول المعطى ثم عرضها عن طريق استعلام تجميع ميزة هذه الطريقة انها لا تتقيد بعدد الموظفين الذين يشتركون في العملية ( يعنى ممكن مشاركة العملية عدد لا حصر له من الموظفي ... اثنين أو 100 ) وهذا هو الكود المستخدم DoCmd.SetWarnings False DoCmd.RunSQL "DELETE * FROM Table3" DoCmd.SetWarnings True Dim rstS As DAO.Recordset Dim rstD As DAO.Recordset Dim x() As String Dim i As Long Set rstS = CurrentDb.OpenRecordset("Select * From [Table1]") Set rstD = CurrentDb.OpenRecordset("Select * From Table3") DoCmd.Hourglass True Do While Not rstS.EOF x = Split(rstS![الاسم], "-") For i = LBound(x) To UBound(x) rstD.AddNew rstD!عدد_العمليات = rstS![عدد_العمليات] rstD!الاسم = Trim(x(i)) rstD.Update Next i rstS.MoveNext Loop rstS.Close: Set rstS = Nothing rstD.Close: Set rstD = Nothing DoCmd.Hourglass False Me.Requery Exit Sub op.accdb
  8. هل هناك جدول اخر لاسماء الموظفين غير هذا الجدول ؟؟؟؟ ممكن تزودنا به
  9. طيب جرب المرفق .... kan_761.accdb
  10. وعليكم السلام ورحمة الله وبركاته فكرة لك أن اردت جعل الجهاز المعار لا يظهر من اساسة من ضمن الاجهزة المعارة يعني ( الجهاز المسلم للموظف لا يظهر في القائمة حتى يتم تسليمة ) بهذا الشكل تقل عدد الاجخزة بدل اختيارها وظهور رسالة ثم تعيد اختيار جهاز اخر .... IT_v1_0001.rar
  11. هههههه ... البرمجة تعلم الصبر
  12. فقط احذف هذا من الكود لديك ... Me.Requery
  13. امين واياك اخي الكريم .... انما انا طالب علم بارك الله فيك ... الحمد لله رب العالمين ... بالتوفيق اخي الفاضل ...
  14. يا اخي المفروض تضغ مثالك حتى نعرف المشكلة بالضبط .... على كل حال انظر المرفق لا يتغير التنسيق ...... tt1.mdb
  15. وضح ايش المشكلة .... الصلاحيات شغالة ...
  16. يعطيك العافيه اخي @أبو إبراهيم الغامدي طريقة رائعه و استاذ قدير ..... بارك الله فيك وفي وقتك
  17. احسن الله اليك استاذي الغالي @احمد الفلاحجي واياك .... بارك الله فيك ....
  18. تفضل -------->>>>>> Database_kan.accdb
  19. مشكور حبيبنا @jjafferr بارك الله فيك ... رائع دائما ..
  20. طبعا الرسالة .. حتى تحمي عمليات الدخول للنموذج بدون تسجيل .... لكن لتعديل التصميم انظر الصورة
  21. جرب المرفق بعد التعديل ..... الان لايمكن تعديل اليوزر من نفس اليوزر دون الحاجة للدخول بيوزر اخر كيف يعني تغير في النموذج ...؟؟ ما فهمت عليك ؟؟؟ فصدك تغير التصميم ؟؟؟ prog_قاعدة البيانات الشهادات المدرسية 02.accdb
  22. ادخل باسم اليوزر 1 والباس 1 وعدل بيانات kanory لانه يرفض تعديل اليوزر اذا دخل به
×
×
  • اضف...

Important Information