ابوخليل

قبل التعديل يجب الاجابة عن استفسارين : الاول : هل الاقساط سنوية ام فصلية الثاني : كيف يتم تسجيل الاقساط ؟ هل في بداية السنة يتم ادراج الاقساط كلها للطالبة في النموذج مع تاريخ الاستحقاق ثم عند التسديد يؤشر على على خانة سدد ؟ ام ان ادراج بيانات القسط داخل النموذج يتم عند التسديد فقط ؟

اخونا امير شكرا لاجابة الدعوة ورأيك وجيه وهو ما سنسعى لتحقيقه وايضا يبدو انك على جانب لا بأس به من الخبرة فلا تبخل علينا جزيت خيرا نرجع لدرسنا : وما زلنا في المعوقات : ذكرنا اننا نستطيع فحص الامان في وندز فان كان منخفضا اكملنا تنصيب برنامجنا ، وان كان مرتفعا خفضناه ثم اعدنا تشغيل النظام وقد عرضنا الكود المسؤول عن هذه العمليات . لنفرض ان امان وندز كان مرتفعا فقمنا بخفضه ثم اعادة التشغيل المطلوب : وهذا الطلب منطقي _وحيث لا يحضرني منه شيء الآن _ فهو للجميع ، كل يدلي بدلوه نريد ان يفتح النظام على برنامجنا حتى نستكمل التنصيب ؟

حقيقة لا اجد ما اقوله لأستاذنا وشيخنا ابي آدم ولكن سروري لا يوصف انه ينتظر : للتقويم .. والتقييم .. ومد يد العون أخي محمد أيمن جزاك الله خير سندرج الكود المذكور عند الحاجة الى اضافة مراجع معينة وقلت عند الحاجة : لان بعض المكتبات تعمل من دون اضافة مرجعها الى اكسس ( فقط يكفي تسجيلها في وندز ) ايضا هناك ملحوظة وهي ان الكود لن يعمل الا بحال وجود المكتبة داخل ملف النظام وهنا مربط الفرس

اسفة اثقلت عليك العلم للجميع والنقاش للفائدة والذي فهمته انه في السنة الجديدة تكون رسوم جديدة ثم من في ذمته شيء من العام المنصرم يبقى ويطالب بسداده ان كان فهمي صحيحا : فكل ما علينا فعله هو جعل النموذج الفرعي الذي مصدره جدول الاقساط يستند الى استعلام حتى نضع المعايير اللازمه داخله والمعيار سيكون تاريخا حيث نظهر بيانات السنة الجديدة فقط اما ما قبلها فيكون له نموذج يخصه من خلال الاستعلام نفسه مع اختلاف المعيار فقط ايضا من ملاحظاتي داخل المثال ظهور الطالبات المنقولات في النموذج وهذه المسألة ايضا مثل سابقتها تحتاج الى استعلام لحجب المنقولات عن الظهور

وعلى هذا درسنا السابق لم ينته بعد واصبح الحديث ذو شجون حتى اني فكرت بتغيير العنوان من باب حسن الدلالة والوصف ثم اذا تطرقنا الى المكتبات وتسجيلها احيل القارىء الى هذا العنوان

يسرني مشاركتك في الدرس فالمطلب والغاية واحدة ولكني اتلطف اليك لو منحت نفسك اسما عربيا يسرك سماعه كي نناديك به وحتى يحسن النقاش تفضل من هنا http://www.officena.net/ib/index.php?showtopic=41520

اسأل الله الكريم رب العرش العظيم ان يشفي والدتك ويعافيها شفاء لا يغادر سقما

كل شيء ممكن بإذن الله فقط اريد توضيح الجملتين اعلاه ، اليس بين الجملتين تناقض؟ حيث ان السطر الاول من المشاركة الاولى والسطر الثاني من مشاركتك الاخيرة

أولا : المعوقات درجة أمان windows حيث لا يمكننا إضافة أو تسجيل ملفات حين تكون درجة امان حساب المستخدم مرتفعة وحتى لو قمنا بتركيبها يدويا فلن يتسنى لنا ذلك الا بعد تخفيض الأمان الى الحد الأدنى ثم اعادة تشغيل النظام وهنا يتبادر سؤال : ماذا لو كان الامان على الحد الأدنى ؟ كيف نعلم ذلك ؟ وهل سيختلف الاجراء ؟ إذا : يجب اولا التأكد من درجة الامان فإن كان منخفضا حينها تتم خطوات التنصيب والا سيقوم البرنامج بتخفيض الامان ثم يعيد تشغيل النظام وهنا يتبادر تساؤل ايضا : هل سيبقى الامان منخفضا ؟ وهل يجب علينا اخبار المستخدم بالوضع الحالي ؟ أم انه يلزمنا اعادة الامان الى وضعه السابق ؟ كل هذه الامور تجعلنا _ وبالاصح تجعلني_ أفضل ان يقوم المستخدم بالعملية بنفسه حيث انها لا تأخذ من المستخدم سوى نقرتين فقط واحدة على زر ابدأ والثانية على صورة المستخدم ليجد أمامه اعدادات التحكم في حسابه . والآن الى الخطوات : 7 windows قراءة حساب المستخدم ودرجة الأمان : Dim objWShell, objReead Set objWShell = CreateObject("WScript.Shell") objReead = objWShell.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System\EnableLUA") اذا كانت درجة الامان مرتفعه نقوم بتخفيضها وإلا نخرج من الحدث : If objReead = "1" Then objWShell.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System\EnableLUA", 0, "REG_DWORD" Else Exit Sub End If ويمكن عكس الوضع : اذا كانت درجة الامان مرتفعه نقوم بتخفيضها وإلا نرفعها If objReead = "1" Then objWShell.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System\EnableLUA", 0, "REG_DWORD" Else objWShell.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System\EnableLUA", 1, "REG_DWORD" End If يأتي الآن دور تثبيت التغيير ويتحقق بإعادة تشغيل النظام ويمكن تخيير المستخدم بين التنفيذ من عدمه : If MsgBox("سيتم إعادة تشغيل النظام" & vbCrLf & _ " هل تريد المتابعة؟", _ vbQuestion + vbYesNo, _ "اعادة تشغيل النظام") = vbNo Then Exit Sub Set objWShell = Nothing Else objWShell.Run "shutdown /r /t 10 /f /d P:4:2" Set objWShell = Nothing End If انتهينا يتبع ...

تفضلي تم التعديل على النموذج آمل ان يحقق المطلوب المدرسة المتوسطة تم.rar

بسم الله الرحمن الرحيم اخواني الاكارم ما يقلق المبرمج عادة عند انتهاء مشروع من مشاريعه الا الملفات التشغيلية المصاحبة للبرنامج والحصول على المساعدة اللازمة لتركيبها ثم تشغيلها والتركيب والتسجيل اليدوي مزعج حتى للمبرمج فكيف بالمستخدم العادي لذا فجعل البرنامج عند التنصيب هو الذي يقوم بالمهمة مطلب ضروري ، وهو ما سنتطرق له في هذا الموضوع علما انه يوجد من تطرق لهذا الموضوع في هذا المنتدى وغيره ولكن لكل موضوع خصوصيته وطريقته فأتمنى ان تجدوا اضافة ومعلومة جديدة في هذا الموضوع وبالله التوفيق يتبع ...

ولكن بغض النظر عن التسميات كيف سيتم التنفيذ هل يتم استبدالالاول الابتدائي 1/1 بــ الثاني الابتدائي 2 / 1 مثلا وهل عند التسجيل يتم ادخال هذه التسميات والارقام كتابة ام باختيار من مربعات تحرير ، حيث ان المثال المرفق ناقص وطريقة الحل هي بتوظيف استعلام تحديث عبر نموذج نضع فيه حقلين واحد (للمرحل) والآخر (للمرحل إلى) وبضغطة زر يتم الترحيل صف صف او فصل فصل

ينقل الى منتدى إكسل

الحل اننا نستعين باستعلام يضم الجداول جميعا وهو ما يسمى استعلام التوحيد انظر مثالك بعد التعديل db11.rar

المطلوب واضح اخي امهلني . إن شاء الله سأعد موضوعا خاصا بهذا الشأن .

الالغاء يكون كلي فكما بضغطة زر يتم اعداد الرواتب ايضا بضغطة زر اخرى يتم الالغاء حذف مرتبات rr.rar

تفقد مكتباتك

الاقتصار على استفسار واحد في المشاركة يجعل الشخص يتشجع للرد والعكس صحيح وبالنسبة لمشكلتك: فإن البيانات في جدول الرواتب بيانات تاريخية لا يمكن تغييرها ابدا وهذا هو الصحيح ولتلافي الاخطاء التي تحصل من معد الرواتب او السقط غير المقصود : فليس لك الا طريق واحد وهو حذف الشهر الذي تم اعداده ثم الحاقه مرة أخرى بالتعديلات الجديدة

باعتبار البرنامج مكتمل والشعار يظهر على جميع التقارير وجميع الواجهات ، وهذا الشعار موجود كصورة داخل مجلد البرنامج بجانب قاعدة البيانات في المثال المرفق استورد منه النموذج الى برنامجك وسيقوم باستبدال الشعار القديم بالشعار الجديد وبضغطة زر واحدة changePic.rar

كل الطرق تؤدي الى نتيجة واحدة اما ان ترفق صورة بدون مسار فهذا ممكن ولكن بمجرد قفل النموذج تذهب من غير رجعة ويمكن جعلها ثابتة بشرط تغيير مسار الصورة في الخصائص وهذا لا يتأتى الا عند فتح النموذج على عرض التصميم ويمكن بالكود ترتيب عمل ذلك ، ولكن هذه الطريقة لن تعمل في mde والخلاصة : حتى لو فرضنا امكانية تحقق ذلك فمن غير المستحسن ادراج الصور وتضمينها داخل قاعدة البيانات فمن غير المستبعد ان 50 صورة فقط تستوعب طاقة قاعدة اكسس التخزينية وحتى لو كانت صورة واحدة او اثنتان كشعار ونحو ذلك ، فالمكان الافضل لها هو مجلد البرنامج في السطر الاخير اعلاه قد يبرز مطلب : المستخدم مثلا يضطر الى تغيير الصور عبر مجلد البرنامج والمطلوب ان يستبدلها من خلال زر داخل البرنامج

وعليكم السلام لماذا تلجأ الى هذه الطريقة؟ قد نجد طريقة لتحديث البيانات بدلا من ذلك هل جربت العبارة Docmd.Requery ؟

آمين وإياكم تمت الاجابة ،،،

هذه ليست ازرار كالتي وضعتها في مثالك هي عبارة عن جزئين 1- صورة 2- تسمية لاحظ في الخصائص عند القيمة علامة في التسمية تم كتابة اسم الصورة اعد محاولاتك وانا على يقين انك ستنجح

قد ذكرت لك ذلك رعاك الله ولديك حقلان آخران ايضا هما المنصب والخطورة ولا بأس في ظهور الحقول الاربعة في استعلام الراتب لاننا لن نستخدمهما . ولن تجري عليهما عمليات مستقبلا تم التعديل على المثال ويمكنك ملاحظة الحقول الجديدة المعدلة داخل استعلام الالحاق ( فقط زيادة حرف X ) dd11.rar

compile error:user defined-type not defined تخرج هذه الرسالة عندما يكون هناك نقص في المكتبات والمكتبة الناقصة عندك هي microsoft office Opject library ' بالطبع ضروري ولو استبدلت المتداد بــ * النجمة لظهرت معك جميع الملفات