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

ابوخليل

أوفيسنا
  • Posts

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

  • Days Won

    233

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

  1. بعد اجالة الفكر .. عدلت عن فكرة المالك او تدخل الموظف .. وافكر بطريقة تكون خفيفة وآلية ما لون بالاحمر هو ما كنت افكر به عند طرحي للموضوع : ولكن كما ذكرت صرفت النظر عن التدخل البشري .. واريد ان يتم الأمر آليا عن طريق الزبون الفكرة لم تتبلور بعد ------------------------------------------------------------------------------------------ قبل ان ابدأ بتنفيذ الفكرة سوف اطرح الخطوات لأستنير بآرائكم وأنهل من علمكم
  2. في التقرير : في حدث التحميل اذا انت تعرض التقرير قبل طباعته او في حدث الطباعة اذا انت تطبع مباشرة ضع السطر التالي Private Sub Report_Load() Me.Caption = [Forms]![frm_Section]![cbo_Class] End Sub اعجبني جمال العرض في السؤال .. مع ان الطلب يمكن ايضاحه بسطرين او ثلاثة اتمنى نراك قريبا تتصدر الاجابات للأعضاء على هذه الطريقة
  3. تقصد انك تعمل مجلد بجانب قاعدة بيانات الجداول .. ويتم حفظ الملفات في المجلد .. مهما تغير مكان هذه القاعدة بمعنى اوضح .. قاعدة الجداول على الجهاز السيرفر .. وتريد حفظ الملفات من اي واجهة فرعية على السيرفر؟ اذا صح .. نعم يمكن
  4. الملف مضغوط .. يجب فك الضغط اولا .. يبدو انك لم تنتبه لهذا .. او ليس لديك برنامج ضغط وفك الملفات وما دمت حصلت على مرادك فضلا اقفل الموضوع باختيار افضل اجابة
  5. له من اسمه نصيب .. عذاب .. نسأل الله السلامة اول مشاركة لي .. الحل فيها متكامل فقط يضع في اعلى الكود او اسفله : سطر اضافة سجل جديد
  6. شكرا لك .. لا ارغب في تعبك .. يكفيني شرح الفكرة هذه ينوب عنها اضافة عدد ابام التوقف مسبقا مباشرة في حقل بجانب تاريخ الاشتراك ( على اعتبار انها معروفة أو انها هي التي اقرها النظام حسب نوع الاشتراك) افكر .. كيف يتوقف الزمن .. هل هذا ممكن ؟ يتوقف لفترة محددة لمن فترتهم محددة .. اما الفترة المفتوحة فيحددها عودة الزبون جاءتني فكرة وانا اكتب الآن : ( وهي حصر عدد الايام الفعلية لمدة الاشتراك بدلا من المقارنة بين تاريخين) ما رأيكم ان نجعل الاشتراك انواع : عادي . ممتاز . vip وبما ان عدد ايام الاشتراك معلومة مسبقا سواء كانت شهرا او سنة .. يكون الاحتساب بعدد توقيعات الحضور ( مع الاخذ بالاعتبار حذف ايام العطل من العدد حيث تكون محسوبة افتراضيا ).. هذا بالنسبة للاشتراك الممتاز المفتوح . بقي الاشتراك العادي .. كيف اتعامل معه .. على فرضية تطبيق الفكرة على الجميع .. حيث ان المشترك العادي توقفه مبني على موافقة المالك
  7. صاحبي لديه برنامج تسجيل ومتابعة خدمات لمنشأة الزبون او العميل مشترك في هذه الخدمة شهريا يجدد الاشتراك كل شهر في يوم ما ومع بداية الشهر وبعد ان سدد الزبون الاشتراك حصل لديه ظرف سفر طارىء لمدة نصف شهر ويريد التوقف المؤقت .. بمعنى ان لا يتم احتساب ايام سفره يقول صاحبي : برنامجي يظهر اسماء الزبائن الذين اقترب موعد انتهاء اشتراكهم ( يقارن التاريخ الحالي بتاريخ يوم الاشتراك) حيث اني عملت طريقة في برنامجي وهي اني اضيف الايام التي سيتغيب فيها .. الى سجل الاشتراك فلا يظهر الاشعار فلو كان الاشتراك شهرا 30 يوما ويريد ان يتوقف اسبوعا .. اقوم باضافة 7 ايام الى سجله فيصبح مجموع الايام 37 يقول صاحبي .. لدينا زبائن دائمين واشتراكهم سنوي .. واريد ان اجعل التوقف لهم خاصا مفتوحا بدون تحديد بحيث الزبون يسافر او ينقطع ماء شاء شهر او شهرين او سنة .. بمعنى يكون اشتراكه عبارة عن رصيد .. حسب الاستفادة من الخدمة وليست حسب الوقت يقول : واريد ان اجمع بين الطريقتين اختار منهما ما يناسب الزبون اخواني واحبتي .. احببت ان تشاركوني بافكاركم
  8. البحث وتعديل درجات8.rar
  9. شكرا للمشاركة اخي ابو بسملة تفضل تعديل كامل على الكود مع المرفق Dim db As Database Dim td As TableDef Set db = CurrentDb() For Each td In db.TableDefs If Left(td.Name, 4) = "MSys" Or Left(td.Name, 1) = "~" Then GoTo Continue DoCmd.RunSQL "DELETE * FROM " & td.Name & ";" Continue: Next MsgBox " all records in all tables are deleted" Me.Requery Database2.rar
  10. العلاقات بين الجداول .. تأكد منها خاصة .. خاصية تتالي الحذف
  11. نعم صح وازيدك من الشعر بيت "فيما لو فرضنا ضبط المسألة بطريقة ما" .. لما يكون احد المستخدمين فاتح البرنامج .. يكون المجال مفتوح لنسخ الجداول على الاجهزة الأخرى وتصديرها من غير فتح البرنامج
  12. جميل جدا .. مع ان الحقل status ثغرة يمكن التلاعب بها فتنعكس العملية . هل الاعلان عن متغير رقمي عند الفتح وعندما يتم فك التشفير تتغير قيمته من اجل شرط التشفير يقوم بالمهمة بدلا من الحقل ؟ والافضل عند تغير قيمة المتغير ان تتغير الى : صفر ويكون هو الشرط لماذا ؟ ... خشية ان يحدث خطأ .. فاي error عند العمل على البرنامج مهما كان صغيرا يسبب مسح للذاكرة هنا لو تم مسح الذاكرة سيبقى المتغير على قيمته الافتراضية صفر
  13. فضلا راجع الوحدة النمطية .. آخر دالتين في الاسفل .. تخص الصفوف الدنيا لا يوجد شيء اسمه : له او لها برنامج علاجي .. ايضا لا يوجد شيء اسمه دور ثاني
  14. شكرا اخي فادي للتنبيه .. تم فصل الموضوع ويمكنك فتح موضوع خاص بك ان احببت .
  15. البرامج مهما كان حجمها وتوسعها غالبا لا تزيد الجداول المهمة فيها عن اثنين او ثلاثة ومع ذلك يمكنك تشفير 100 جدول بضغطة زر المهم ان الحقول الرقمية لا يتم تطبيق التشفير عليها .. فقط الحقول التي نوعها نصي تفضل تم تعديل الملف ليتعامل مع الجداول مباشرة بدلا من النموذج زر واحد للتشفير وفك التشفير .. نقرة واحدة للتشفير (انظر الجداول) والنقرة الأخرى لفك التشفير (انظر الجداول ) الكود بسيط عبارة عن دالة واحدة تشفر وتفك التشفير .. ضعها في المكان المناسب بدلا من الزر ويمكنك عمل متغيرات كشروط احتياطية عند التشفير وعكسه حماية تشفير2.rar
  16. فكر قليلا هو الحل نفسه ادرج سطر الحفظ او سجل جديد في أعلى الحدث
  17. السلام عليكم ايضا انا لدي تساؤل ؟؟ كيف تضع الرقم المطلوب داخل النموذج بمعنى : كيف تعرف مرتبة الرقم الذي ستضيفه .. بمعنى اوضح كيف عرفت ان الرقم المناسب هو 9 ؟ ماهي معاييرك ؟ الحل برأيي : ان اعادة الترقيم يكون منفصل عن الادخالات يتم الترقيم التلقائي بناء على التاريخ الذي يتم فرزه من الأقدم الى الأحدث يمكنك اعادة الترقيم في اي وقت سواء ادخلت بيانات ام لم تدخل ADD2.rar
  18. العلم تراكمي والخبرة وليدة الحاجة والتجربة .. نعم ما زلنا نتعلم .. وكمال العلم لله سبحانه . يوجد اكواد تعالج استخراج الصور من النموذج ومن ضمنها صورة الخلفية ، وايضا اعتقد قرأت انه يمكن التعامل مع هذه الصور من خلال جدول النظام . وحاولت وقتها ولكني لم اوفق .. المسألة بحاجة الى وقت للمحاولة والتجربة ولكن طريقة استخدام الوسيط في تصدير الفورم سهلة وقريبة .. ولا يحتاجها الا المصمم فقط . حين يفقد محفوظاته
  19. مشاركة مع اخي محمد يمكن الاستعانة بوسيط لإخراج الصور على النحو التالي : افتح البرنامج على عرض التصميم في جزء التنقل : - حدد النموذج الذي يحتوي على صورة خلفية أو تنسيق تلقائي تريده - انقر بزر الماوس الأيمن على النموذج في جزء التنقل وحدد تصدير >> XML في الصفحة الأولى من المعالج ، حدد مكان الحفظ انقر التالي او موافق سيظهر لك مربع حوار صغير به ثلاثة مربعات اختيار قم باختيار الخيار الأول (البيانات) والخيار الثالث (العرض التقديمي) ثم اضغط موافق انقر فوق الزر "إغلاق" في الصفحة الأخيرة من المعالج بعد اكتمال عملية التصدير اذهب الى مكان الحفظ ستجد جميع صورك في مجلد Images
  20. لم يتم ادخال درجات الطلاب كما هو موجود كل صف 5 طلاب حتى نعمل بطريقة صحيحة ونتأكد من النتائج ادخل درجات جميع الطلاب للفصل الدراسي الأول وللفصل الدراسي الثاني يجب ان تكون نتيجة الطلاب موافقة للبنود المراد تصفيتها .. من اجل تتأكد ناجح - ناجحة - له برنامج علاجي - لها برنامج علاجي - غ
  21. تفضل تم تغيير الحدث Dim x As Integer x = Nz(DCount("asm", "tbl1", "asm='" & Me.asm & "'"), 0) If x > 0 Then Beep MsgBox "هذا الاسم موجود سابقا", , "" DoCmd.CancelEvent Exit Sub End If الاسم موجود سابقا3.rar
  22. تفضل حماية تشفير.mdb
  23. بعد الرسالة اكتب : Undo الاسم موجود سابقا2.rar
  24. اذا قصدك عند ظهور التقرير والنتيجة يتم انشاء جدول ؟ نعم يمكن تعمل جدول يتجدد عند فتح التقرير كل مرة
  25. عملت لك المساعدة 100% تم انجازه بقي ان تعمل الفردي على غرار الجماعي الأمر يسير فقط ادرس العمل جيدا وحاول ولن يصعب عليك باذن الله حاليا انا لدي اعمال تأخذ كل وقتي .. اتواجد في المنتدى بين فترة واخرى للترويح عن النفس آمل ان تتقبل اعتذاري
×
×
  • اضف...

Important Information